
import           Database.HDBC (disconnect, runRaw)
import           Spec
import           SpecHelper    (loadFixture, openConnection)
import           Test.Hspec

main :: IO ()
main = do
    c <- openConnection
    runRaw c "drop schema if exists public cascade"
    runRaw c "drop schema if exists dbapi cascade"
    loadFixture "schema" c
    loadFixture "role" c
    disconnect c