khibino/haskell-relational-record
1
1
Fork 0
mirror of https://github.com/khibino/haskell-relational-record.git synced 2024-11-29 06:37:03 +03:00
Code Issues Projects Releases Wiki Activity

Update haddocks.

Browse Source
This commit is contained in:
Kei Hibino 2013-09-03 23:23:43 +09:00
parent 0e0e7af66e
commit 6ad47d791f
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
sql-words/src/Language/SQL/Keyword/Concat.hs
View File

@ -27,7 +27,7 @@ module Language.SQL.Keyword.Concat (
(.=.), (.<.), (.<=.), (.>.), (.>=.), (.<>.),
and, or, not, in',
-- * Uni-nary operator
-- * Unary operator
defineUniOp
) where
@ -119,7 +119,8 @@ and = defineBinOp AND
or :: Keyword -> Keyword -> Keyword
or = defineBinOp OR
-- | Uni operator
-- | Define unary operator on 'Keyword' type represeted by specified 'Keyword'.
-- Result is delimited by whitespace like unwords on 'String' list.
defineUniOp :: Keyword -> Keyword -> Keyword
defineUniOp op e = unwords' [op, e]

4
sql-words/src/Language/SQL/Keyword/ConcatString.hs
View File

@ -24,7 +24,7 @@ module Language.SQL.Keyword.ConcatString (
(.=.), (.<.), (.<=.), (.>.), (.>=.), (.<>.),
and, or, not, in',
-- * Uni-nary operator
-- * Unary operator
defineUniOp
) where
@ -87,7 +87,7 @@ and = defineBinOp AND
or :: String -> String -> String
or = defineBinOp OR
-- | Define uni-nary operator on 'String' type represeted by specified 'Keyword'.
-- | Define unary operator on 'String' type represeted by specified 'Keyword'.
-- Result is delimited by whitespace like unwords on 'String' list.
defineUniOp :: Keyword -> String -> String
defineUniOp op e = unwords [wordShow op, e]