1
Fork 0

few small fixes

untested fix for case insensitive keywords
add partial support for interval literals
fix bug in prefix operator cast parsing
This commit is contained in:
Jake Wheat 2013-12-14 00:07:45 +02:00
parent 9c4719bda3
commit f08f4eb13b
5 changed files with 27 additions and 13 deletions
Language/SQL/SimpleSQL

View file

@ -23,6 +23,10 @@ back into SQL source text. It attempts to format the output nicely.
> scalarExpr :: ScalarExpr -> Doc
> scalarExpr (StringLit s) = quotes $ text s
> scalarExpr (NumLit s) = text s
> scalarExpr (IntervalLit v u p) =
> text "interval" <+> quotes (text v)
> <+> text u
> <+> maybe empty (parens . text . show ) p
> scalarExpr (Iden i) = text i
> scalarExpr (Iden2 q i) = text q <> text "." <> text i
> scalarExpr Star = text "*"