|
From: Frederik E. <fre...@a5...> - 2006-08-23 01:18:13
|
Hi,
Here is another patch. Many schemata, for instance that of Wikipedia,
use "tinyint" as a synonym for "bit". So I thought it would be good to
support those:
----------------------------------------------------------------
diff -ur HSQL-1.7-modified-2/HSQL/Database/HSQL.hsc HSQL-1.7-modified-3/HSQL/Database/HSQL.hsc
--- HSQL-1.7-modified-2/HSQL/Database/HSQL.hsc 2006-08-23 02:14:59.000000000 +0100
+++ HSQL-1.7-modified-3/HSQL/Database/HSQL.hsc 2006-08-23 02:15:34.000000000 +0100
@@ -277,6 +277,7 @@
instance SqlBind Bool where
fromSqlValue SqlBit s = Just (s == "t")
+ fromSqlValue SqlTinyInt s = Just (read s /= (0::Int))
fromSqlValue _ _ = Nothing
toSqlValue True = "'t'"
----------------------------------------------------------------
Are these patches making it in?
Thanks,
Frederik
--
http://ofb.net/~frederik/
|