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

fix the lateral parsing issue and broken test

Browse source
This commit is contained in:
Jake Wheat 2013-12-17 16:33:56 +02:00
parent e03090a6a1
commit bfe07dce53
2 changed files with 8 additions and 8 deletions
Language/SQL/SimpleSQL
Parser.lhs

3
Language/SQL/SimpleSQL/Parser.lhs
View file

@ -514,7 +514,8 @@ tref
> tref = nonJoinTref >>= optionSuffix joinTrefSuffix
> nonJoinTref = choice [try (TRQueryExpr <$> parens queryExpr)
> ,TRParens <$> parens tref
> ,TRLateral <$> (try (keyword_ "lateral") *> tref)
> ,TRLateral <$> (try (keyword_ "lateral")
> *> nonJoinTref)
> ,try (TRFunction <$> name
> <*> parens (commaSep scalarExpr))
> ,TRSimple <$> name]