1
Fork 0

add support for 'table t' syntax

This commit is contained in:
Jake Wheat 2013-12-17 13:58:44 +02:00
parent 4308acb982
commit 72b67166d9
6 changed files with 63 additions and 64 deletions
tools/Language/SQL/SimpleSQL

View file

@ -24,6 +24,7 @@ These are a few misc tests which don't fit anywhere else.
> ,combos
> ,withQueries
> ,values
> ,tables
> ]
@ -199,3 +200,8 @@ These are a few misc tests which don't fit anywhere else.
> ,Values [[NumLit "1", NumLit "2"]
> ,[NumLit "3", NumLit "4"]])
> ]
> tables :: TestItem
> tables = Group "tables" $ map (uncurry TestQueryExpr)
> [("table tbl", Table "tbl")
> ]