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

parse a join b without inner

Browse source
This commit is contained in:
Jake Wheat 2013-12-17 12:27:00 +02:00
parent 9461a11c97
commit adfeac8d16
3 changed files with 16 additions and 11 deletions
tools/Language/SQL/SimpleSQL
TableRefs.lhs

4
tools/Language/SQL/SimpleSQL/TableRefs.lhs
View file

@ -20,6 +20,10 @@ expression
> ,ms [TRJoin (TRSimple "t") JInner (TRSimple "u")
> (Just $ JoinOn $ Iden "expr")])
> ,("select a from t join u on expr"
> ,ms [TRJoin (TRSimple "t") JInner (TRSimple "u")
> (Just $ JoinOn $ Iden "expr")])
> ,("select a from t left join u on expr"
> ,ms [TRJoin (TRSimple "t") JLeft (TRSimple "u")
> (Just $ JoinOn $ Iden "expr")])