Испытание Elm: как проверить, является ли результат Err?

Question

Я пишу тесты для функций, которые возвращают результат. Как проверить, что это «есть» Err (или «Хорошо», если на то пошло)?

\() -> Expect.equal expectedFailure (Err _) 

не работает.

Как декодировать непараметр?

Answer 1

Возможно, будет более элегантное решение, которое я пропустил, но я лично просто напишу вспомогательную функцию.

resultOk result = 
    case result of 
     Ok _ -> True 
     Err _ -> False 

затем в тестах

Expect.true "expected this to be OK" (resultOk <| Ok "All good") 
Expect.false "expected this to be an error" (resultOk <| Err "Oh no!") 

Expect.true и Expect.false взять строку для печати, если тест не пройден, а затем выражение, которое должно быть истинным (в случае Expect.true) или ложным (в случай Expect.false).