Skip to content

Instantly share code, notes, and snippets.

@jzxhuang
Created April 4, 2019 07:40
Show Gist options
  • Save jzxhuang/b743498f81f017799104ca1b56ac88c8 to your computer and use it in GitHub Desktop.
Save jzxhuang/b743498f81f017799104ca1b56ac88c8 to your computer and use it in GitHub Desktop.
expectStringResponse : (Result x a -> msg) -> (Response String -> Result x a) -> Expect msg
type Response body
= BadUrl_ String
| Timeout_
| NetworkError_
| BadStatus_ Metadata body
| GoodStatus_ Metadata body
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment