diff --git a/simplest-sqlite.cabal b/simplest-sqlite.cabal
--- a/simplest-sqlite.cabal
+++ b/simplest-sqlite.cabal
@@ -2,7 +2,7 @@
 cabal-version: >= 1.10
 
 name: simplest-sqlite
-version: 0.1.0.4
+version: 0.1.0.5
 stability: Experimental
 author: YoshikuniJujo <PAF01143@nifty.ne.jp>
 maintainer: YoshikuniJujo <PAF01143@nifty.ne.jp>
diff --git a/src/Database/SmplstSQLite3.hs b/src/Database/SmplstSQLite3.hs
--- a/src/Database/SmplstSQLite3.hs
+++ b/src/Database/SmplstSQLite3.hs
@@ -1,4 +1,5 @@
-{-# LANGUAGE TupleSections #-}
+{-# LANGUAGE LambdaCase, TupleSections #-}
+{-# LANGUAGE TypeApplications #-}
 
 module Database.SmplstSQLite3 (
 	-- * Functions
@@ -127,6 +128,12 @@
 instance SQLiteData () where
 	bindN = sqlite3BindNull
 	column _ _ = return ()
+
+instance SQLiteData Bool where
+	bindN stmt i = \case
+		False -> sqlite3BindInt stmt i 0
+		True -> sqlite3BindInt stmt i 1
+	column stmt i = (/= 0) <$> column @Int stmt i
 
 instance SQLiteData Int where
 	bindN = sqlite3BindInt