rename qeFetch to qeFetchFirst
This commit is contained in:
parent
a231c7e9f8
commit
40c64c7631
4 changed files with 40 additions and 5 deletions
Language/SQL/SimpleSQL
|
@ -38,9 +38,37 @@ because the parser applies the fixity fix to every 'top level' value
|
|||
expr, we don't need to descend into query exprs to find the value
|
||||
exprs inside them.
|
||||
|
||||
start creating test list
|
||||
start creating test list:
|
||||
|
||||
create tests with an explicit fixity table to check the features of
|
||||
the fixity code, then create tests for sql value expressions which
|
||||
sanity check the fixity applied to these expressions.
|
||||
|
||||
basic fixity tests:
|
||||
|
||||
a + b + c
|
||||
a + b * c
|
||||
a * b + c
|
||||
a + b + c * d
|
||||
a * b + c + d
|
||||
|
||||
try also with right assocative
|
||||
|
||||
a HI b PostfixLow
|
||||
|
||||
a low b PostfixHigh
|
||||
|
||||
a LOWEST b HI c PostfixMEDIUM
|
||||
+ variations
|
||||
|
||||
same with prefix
|
||||
same with chained binops
|
||||
|
||||
----
|
||||
|
||||
now sanity check the basic operators (these use BinOp, PrefixOp,
|
||||
PostfixOp) then sanity check all the other operators which take part
|
||||
in the fixity
|
||||
|
||||
|
||||
> {-# LANGUAGE TupleSections #-}
|
||||
|
|
|
@ -211,7 +211,7 @@ This would make some things a bit cleaner?
|
|||
> ,qeHaving :: Maybe ValueExpr
|
||||
> ,qeOrderBy :: [SortSpec]
|
||||
> ,qeOffset :: Maybe ValueExpr
|
||||
> ,qeFetch :: Maybe ValueExpr
|
||||
> ,qeFetchFirst :: Maybe ValueExpr
|
||||
> }
|
||||
> | CombineQueryExpr
|
||||
> {qe0 :: QueryExpr
|
||||
|
@ -244,7 +244,7 @@ I'm not sure if this is valid syntax or not.
|
|||
> -- > ,qeHaving = Nothing
|
||||
> -- > ,qeOrderBy = []
|
||||
> -- > ,qeOffset = Nothing
|
||||
> -- > ,qeFetch = Nothing}
|
||||
> -- > ,qeFetchFirst = Nothing}
|
||||
|
||||
> makeSelect :: QueryExpr
|
||||
> makeSelect = Select {qeSetQuantifier = All
|
||||
|
@ -255,7 +255,7 @@ I'm not sure if this is valid syntax or not.
|
|||
> ,qeHaving = Nothing
|
||||
> ,qeOrderBy = []
|
||||
> ,qeOffset = Nothing
|
||||
> ,qeFetch = Nothing}
|
||||
> ,qeFetchFirst = Nothing}
|
||||
|
||||
|
||||
> -- | Represents the Distinct or All keywords, which can be used
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue