# Pastebin TEmcMFxR #!/usr/bin/env stack -- stack --resolver lts-18.2 script import Data.Pool (Pool) import Database.Persist.Sql (SqlBackend) import Test.Hspec main :: IO () main = hspec spec spec :: Spec spec = withPool $ do describe "insertAdmin" $ do it "is successful when email has not been taken" pending withPool :: SpecWith SqlPool -> Spec withPool = undefined type SqlPool = Pool SqlBackend