Skip to content

Instantly share code, notes, and snippets.

@maciejsmolinski

maciejsmolinski/mock.hs

Created May 26, 2018 17:14
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save maciejsmolinski/07231d984ce0222f16f2ed831f2070e1 to your computer and use it in GitHub Desktop.
Save maciejsmolinski/07231d984ce0222f16f2ed831f2070e1 to your computer and use it in GitHub Desktop.
Download ZIP
Mocking in Haskell
Raw
mock.hs
data Article = Article
{ title :: String
, body :: String
} deriving (Show)
articles :: IO [Article]
articles =
return
[ Article
{ title = "First article"
, body = "This is an article about writing articles"
}
]
main :: IO ()
main = articles >>= print
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment