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

add support for named host parameters

Browse source
This commit is contained in:
Jake Wheat 2014-04-17 19:27:18 +03:00
parent 19df6f18aa
commit 6720d3e3a3
4 changed files with 33 additions and 5 deletions
Language/SQL/SimpleSQL
Pretty.lhs

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

@ -46,6 +46,11 @@ which have been changed to try to improve the layout of the output.
> valueExpr (Iden i) = name i
> valueExpr Star = text "*"
> valueExpr Parameter = text "?"
> valueExpr (HostParameter p i) =
> text (':':p)
> <+> maybe empty
> (\i' -> text "indicator" <+> text (':':i'))
> i
> valueExpr (App f es) = name f <> parens (commaSep (map valueExpr es))