diff --git a/src/Database/YeshQL/PostgreSQL.hs b/src/Database/YeshQL/PostgreSQL.hs
--- a/src/Database/YeshQL/PostgreSQL.hs
+++ b/src/Database/YeshQL/PostgreSQL.hs
@@ -36,6 +36,7 @@
 import qualified Text.Parsec as P
 import Data.Char (chr, ord, toUpper, toLower)
 import Control.Applicative ( (<$>), (<*>) )
+import Control.Monad (void)
 import System.FilePath (takeBaseName)
 import Data.Char (isAlpha, isAlphaNum)
 
@@ -157,6 +158,7 @@
                              _ -> [| \qstr params conn -> PostgreSQL.query conn (fromString qstr) params |]
                         ReturnTuple One tys ->
                             case tys of
+                              [] -> [| \qstr params conn -> void (PostgreSQL.query conn (fromString qstr) params :: IO [[()]]) |]
                               [t] -> [| \qstr params conn -> fmap (fmap fromOnly . headMay) (PostgreSQL.query conn (fromString qstr) params) |]
                               _ -> [| \qstr params conn -> fmap headMay (PostgreSQL.query conn (fromString qstr) params) |]
                         ReturnRecord Many _ ->
diff --git a/tests/Database/YeshQL/PostgreSQL/Tests.hs b/tests/Database/YeshQL/PostgreSQL/Tests.hs
--- a/tests/Database/YeshQL/PostgreSQL/Tests.hs
+++ b/tests/Database/YeshQL/PostgreSQL/Tests.hs
@@ -67,6 +67,12 @@
         SELECT username FROM users|] conn
     return ()
 
+testEmptyReturn :: Connection -> TestTree
+testEmptyReturn conn = testCase "Simple SELECT (empty return)" $ do
+    [yesh|
+        -- name:getUserByName :: ()
+        SELECT username FROM users WHERE 0|] conn
+
 testSimpleSelectStr :: Connection -> TestTree
 testSimpleSelectStr conn = testCase "Simple SELECT (expr by string)" $ do
     results <- $(yesh $ unlines
diff --git a/yeshql-postgresql-simple.cabal b/yeshql-postgresql-simple.cabal
--- a/yeshql-postgresql-simple.cabal
+++ b/yeshql-postgresql-simple.cabal
@@ -1,5 +1,5 @@
 name: yeshql-postgresql-simple
-version: 4.1.0.1
+version: 4.1.0.2
 synopsis: YesQL-style SQL database abstraction (postgresql-simple backend)
 description: Use quasi-quotations or TemplateHaskell to write SQL in SQL, while
              adding type annotations to turn SQL into well-typed Haskell