Add ToSQLValue Number instance

This commit is contained in:
rightfold 2017-03-21 11:00:56 +01:00
parent 57ca84c05b
commit 0566be6dee
No known key found for this signature in database
GPG Key ID: 199D0373AC917A8F

View File

@ -124,6 +124,9 @@ instance toSQLValueInt :: ToSQLValue Int where
instance fromSQLValueInt :: FromSQLValue Int where
fromSQLValue = fromRight <<< runExcept <<< readInt
instance toSQLValueNumber :: ToSQLValue Number where
toSQLValue = toForeign
instance toSQLValueString :: ToSQLValue String where
toSQLValue = toForeign