hdbc / hdbc-odbc

ODBC driver for HDBC
BSD 3-Clause "New" or "Revised" License
26 stars 34 forks source link

`True` and `"True"` converted to 0 MySQL (Windows) #27

Open EyeOfPython opened 8 years ago

EyeOfPython commented 8 years ago

Running this:

import Database.HDBC
import Database.HDBC.ODBC (connectODBC) 
main :: IO ()
main = do
    conn <- connectODBC "Driver={MySQL ODBC 5.3 Unicode Driver};Database=test;Server=localhost;User=***;Password=***;Option=3;"

    stmt <- prepare conn "INSERT INTO p (a) VALUES (?)"
    execute stmt [toSql True]
    execute stmt [toSql "True"]
    execute stmt [toSql "1"]
    execute stmt [toSql (1::Int)]
    commit conn

    disconnect conn

where

CREATE TABLE test.p (a BOOLEAN);

results in

mysql> select * from test.p;
+------+
| a    |
+------+
|    0 |
|    0 |
|    1 |
|    1 |