diff --git a/src/Database/YeshQL/Util.hs b/src/Database/YeshQL/Util.hs
--- a/src/Database/YeshQL/Util.hs
+++ b/src/Database/YeshQL/Util.hs
@@ -57,15 +57,15 @@
     where
         queryNames = [ basename ++ "_" ++ show i | i <- [0..] ]
 
-withParsedQuery :: (MonadPerformIO m, Monad m)
+withParsedQuery :: (MonadFail m, MonadPerformIO m, Monad m)
                 => (ParsedQuery -> m a) -> String -> m a
 withParsedQuery = withParsed parseQuery
 
-withParsedQueries :: (MonadPerformIO m, Monad m)
+withParsedQueries :: (MonadFail m, MonadPerformIO m, Monad m)
                   => ([ParsedQuery] -> m a) -> String -> m a
 withParsedQueries = withParsed parseQueries
 
-withParsedQueryFile :: (MonadPerformIO m, Monad m)
+withParsedQueryFile :: (MonadFail m, MonadPerformIO m, Monad m)
                     => (ParsedQuery -> m a) -> FilePath -> m a
 withParsedQueryFile p fn =
     withParsedFile
@@ -73,7 +73,7 @@
         (p . nameQuery (queryIdentifier "" fn))
         fn
 
-withParsedQueriesFile :: (MonadPerformIO m, Monad m)
+withParsedQueriesFile :: (MonadFail m, MonadPerformIO m, Monad m)
                       => ([ParsedQuery] -> m a) -> FilePath -> m a
 withParsedQueriesFile p fn =
     withParsedFile
@@ -81,7 +81,7 @@
         (p . nameQueries (queryIdentifier "" fn))
         fn
 
-withParsed :: (Monad m, Show e)
+withParsed :: (MonadFail m, Monad m, Show e)
            => (s -> Either e a) -> (a -> m b) -> s -> m b
 withParsed p a src = do
     let parseResult = p src
@@ -113,9 +113,8 @@
     addDependentFile = const $ return ()
 #endif
 
-withParsedFile :: (MonadPerformIO m, Monad m, Show e) => (String -> Either e a) -> (a -> m b) -> FilePath -> m b
+withParsedFile :: (MonadFail m, MonadPerformIO m, Monad m, Show e) => (String -> Either e a) -> (a -> m b) -> FilePath -> m b
 withParsedFile p a filename =
     addDependentFile filename >>
     performIO (readFile filename) >>=
         withParsed p a
-
diff --git a/yeshql-core.cabal b/yeshql-core.cabal
--- a/yeshql-core.cabal
+++ b/yeshql-core.cabal
@@ -1,5 +1,5 @@
 name: yeshql-core
-version: 4.1.0.2
+version: 4.1.1.2
 synopsis: YesQL-style SQL database abstraction (core)
 description: Use quasi-quotations or TemplateHaskell to write SQL in SQL, while
              adding type annotations to turn SQL into well-typed Haskell