Fixed SKIP not being allowed as a guard without a precondition
This commit is contained in:
parent
71267f12d5
commit
1a3df54ee7
|
@ -1907,6 +1907,10 @@ guard
|
|||
= do m <- md
|
||||
(c, im) <- input
|
||||
return $ A.Alternative m (A.True m) c im
|
||||
<|> do m <- md
|
||||
sSKIP
|
||||
eol
|
||||
return $ A.AlternativeSkip m (A.True m)
|
||||
<|> do m <- md
|
||||
b <- tryVX expression sAmp
|
||||
do { (c, im) <- input; return $ A.Alternative m b c im }
|
||||
|
|
Loading…
Reference in New Issue
Block a user