Add document of class method.

This commit is contained in:
Kei Hibino 2013-06-10 20:10:54 +09:00
parent 441bf8f81c
commit 85b4f603d3

View File

@ -56,6 +56,7 @@ stringExprSQL = ('\'':) . (++ "'") . escapeStringToSqlExpr
-- | Interface for constant SQL expression.
class ShowConstantSQL a where
-- | Make constant SQL expression 'String' from Haskell type 'a'.
showConstantSQL :: a -> String
-- | Constant SQL expression of 'Int16'.