diff --git a/src/Database/PostgreSQL.purs b/src/Database/PostgreSQL.purs
index 8a8b0be..43a7d88 100644
--- a/src/Database/PostgreSQL.purs
+++ b/src/Database/PostgreSQL.purs
@@ -120,6 +120,9 @@ instance fromSQLRowTuple5 :: (FromSQLValue a, FromSQLValue b, FromSQLValue c, Fr
     fromSQLRow [a, b, c, d, e] = tuple5 <$> fromSQLValue a <*> fromSQLValue b <*> fromSQLValue c <*> fromSQLValue d <*> fromSQLValue e
     fromSQLRow _ = Nothing
 
+instance toSQLValueBoolean :: ToSQLValue Boolean where
+    toSQLValue = toForeign
+
 instance toSQLValueChar :: ToSQLValue Char where
     toSQLValue = toForeign