github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 14:21:31 +03:00
Code Issues Projects Releases Wiki Activity

Ruby case can be empty

Browse Source
This commit is contained in:
Timothy Clem 2017-08-02 07:39:10 -07:00
parent 473e7e34dd
commit 6f9836c103
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Language/Ruby/Syntax.hs
View File

@ -279,7 +279,7 @@ for = makeTerm <$> symbol For <*> children (forStatement <*> expressions)
Statement.ForEach <$> (flip makeTerm (reverse rest) <$> location) <*> (pure x) Statement.ForEach <$> (flip makeTerm (reverse rest) <$> location) <*> (pure x)
case' :: Assignment case' :: Assignment
case' = makeTerm <$> symbol Case <*> children (Statement.Match <$> expression <*> whens) case' = makeTerm <$> symbol Case <*> children (Statement.Match <$> (expression <|> emptyTerm) <*> whens)
where where
whens = makeTerm <$> location <*> many (when' <|> else' <|> expressions) whens = makeTerm <$> location <*> many (when' <|> else' <|> expressions)
when' = makeTerm <$> symbol When <*> children (Statement.Pattern <$> (makeTerm <$> location <*> some pattern) <*> whens) when' = makeTerm <$> symbol When <*> children (Statement.Pattern <$> (makeTerm <$> location <*> some pattern) <*> whens)