{"body":"#!/usr/bin/env stack\n-- stack --resolver lts-18.2 script\n\nimport           Data.Pool            (Pool)\nimport           Database.Persist.Sql (SqlBackend)\nimport           Test.Hspec\n\nmain :: IO ()\nmain = hspec spec\n\nspec :: Spec\nspec = withPool $ do\n  describe \"insertAdmin\" $ do\n    it \"is successful when email has not been taken\" pending\n\nwithPool :: SpecWith SqlPool -> Spec\nwithPool = undefined\n\ntype SqlPool = Pool SqlBackend\n\n","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/TEmcMFxR","modified":1627827025,"id":"TEmcMFxR","size":433,"lines":20,"own_paste":false,"theme":"","date":1627827025}