starlitcanopy/simple-sql-parser
1
Fork 0
Code Activity

rename Duplicates -> SetQuantifier + qeDuplicates -> qeSetQuantifier

Browse source
This commit is contained in:
Jake Wheat 2013-12-19 10:34:32 +02:00
parent 2ae1ced7cc
commit 1be27eca58
4 changed files with 23 additions and 10 deletions
Language/SQL/SimpleSQL
Pretty.lhs

4
Language/SQL/SimpleSQL/Pretty.lhs
View file

@ -87,8 +87,8 @@
> scalarExpr (SpecialOp nm es) =
> name nm <+> parens (commaSep $ map scalarExpr es)
> scalarExpr (SpecialOpK (Name nm) fs as) =
> text nm <> parens (sep $ catMaybes
> scalarExpr (SpecialOpK nm fs as) =
> name nm <> parens (sep $ catMaybes
> ((fmap scalarExpr fs)
> : map (\(n,e) -> Just (text n <+> scalarExpr e)) as))