Skip to content

Instantly share code, notes, and snippets.

@epicallan
Created August 11, 2019 14:02
Show Gist options
  • Save epicallan/455856b0279656ac8d62cb4c2cdc8693 to your computer and use it in GitHub Desktop.
Save epicallan/455856b0279656ac8d62cb4c2cdc8693 to your computer and use it in GitHub Desktop.
-- | simple generic implementation
simpleHttp :: (MonadThrow m, HttpNetwork m User) => Id -> m ()
simpleHttp = error "do me..."
-- | Implemenation from well-typed article
simpleHttp
:: (MonadThrow m, Throws HTTPException, Throws DBException, HttpNetwork m User)
=> Id -> m ()
simpleHttp = error "do me..."
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment