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

allow current_timestamp to be parsed, bump version

Browse source
This commit is contained in:
Jake Wheat 2019-08-31 10:08:02 +01:00
parent 9f4a457a4d
commit 3707a09cb8
4 changed files with 16 additions and 10 deletions
tools/Language/SQL/SimpleSQL
QueryExprs.lhs

6
tools/Language/SQL/SimpleSQL/QueryExprs.lhs
View file

@ -13,6 +13,12 @@ query expressions from one string.
> ,("select 1;",[ms])
> ,("select 1;select 1",[ms,ms])
> ,(" select 1;select 1; ",[ms,ms])
> ,("SELECT CURRENT_TIMESTAMP;"
> ,[SelectStatement $ makeSelect
> {qeSelectList = [(Iden [Name Nothing "CURRENT_TIMESTAMP"],Nothing)]}])
> ,("SELECT \"CURRENT_TIMESTAMP\";"
> ,[SelectStatement $ makeSelect
> {qeSelectList = [(Iden [Name (Just ("\"","\"")) "CURRENT_TIMESTAMP"],Nothing)]}])
> ]
> where
> ms = SelectStatement $ makeSelect {qeSelectList = [(NumLit "1",Nothing)]}