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

add support for multiple case when expressions

Browse source
This commit is contained in:
Jake Wheat 2013-12-17 18:42:00 +02:00
parent ebe522b21d
commit 7d094182b7
6 changed files with 28 additions and 31 deletions
Language/SQL/SimpleSQL
Syntax.lhs

2
Language/SQL/SimpleSQL/Syntax.lhs
View file

@ -99,7 +99,7 @@
> -- a=4,b=5 then x end)
> | Case
> {caseTest :: Maybe ScalarExpr -- ^ test value
> ,caseWhens :: [(ScalarExpr,ScalarExpr)] -- ^ when branches
> ,caseWhens :: [([ScalarExpr],ScalarExpr)] -- ^ when branches
> ,caseElse :: Maybe ScalarExpr -- ^ else value
> }
> | Parens ScalarExpr