Skip to content

Instantly share code, notes, and snippets.

@ssanj

ssanj/ExampleErrorSpec.hs

Created February 26, 2021 06:23
Show Gist options
  • Save ssanj/53f392bf4e0dd65381b75579d387a79e to your computer and use it in GitHub Desktop.
Save ssanj/53f392bf4e0dd65381b75579d387a79e to your computer and use it in GitHub Desktop.
Download ZIP
Raw
ExampleErrorSpec.hs
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE ScopedTypeVariables #-}
module ExampleErrorSpec where
import Test.Hspec
import Test.Hspec.Wai
spec :: Spec
spec = withState (return 42) :: IO Int $
describe "This magical number" $
it "is bigger than 40" $ \n ->
n `shouldSatisfy` (>40)
@ssanj
Copy link
Author

ssanj commented Feb 26, 2021

dependencies:

    - tasty
    - tasty-discover
    - tasty-hunit
    - tasty-hspec
    - hspec
    - tasty-hedgehog
    - hedgehog
    - tagged
    - sqlite-simple
    - text
    - aeson
    - scotty
    - transformers
    - data-default-class
    - http-types
    - binary
    - bytestring
    - hspec-wai
    - wai
    - wai-extra
    ```
    
    Stack resolver: resolver: lts-16.17

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment