Fixed parser error for 'for ((;;)) ; do'
This commit is contained in:
parent
157fea73da
commit
b1af7bb8f2
|
@ -1364,6 +1364,7 @@ prop_readForClause4 = isOk readForClause "for((i=0; i<10; i++)); do echo $i; don
|
|||
prop_readForClause5 = isOk readForClause "for ((i=0;i<10 && n>x;i++,--n))\ndo \necho $i\ndone"
|
||||
prop_readForClause6 = isOk readForClause "for ((;;))\ndo echo $i\ndone"
|
||||
prop_readForClause7 = isOk readForClause "for ((;;)) do echo $i\ndone"
|
||||
prop_readForClause8 = isOk readForClause "for ((;;)) ; do echo $i\ndone"
|
||||
readForClause = called "for loop" $ do
|
||||
pos <- getPosition
|
||||
(T_For id) <- g_For
|
||||
|
@ -1381,7 +1382,8 @@ readForClause = called "for loop" $ do
|
|||
z <- readArithmeticContents
|
||||
spacing
|
||||
string "))"
|
||||
readSequentialSep <|> disregard spacing
|
||||
spacing
|
||||
optional $ readSequentialSep >> spacing
|
||||
return $ \id group -> (return $ T_ForArithmetic id x y z group)
|
||||
|
||||
readRegular = do
|
||||
|
|
Loading…
Reference in New Issue