suzanne.soy/tock-mirror
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added a try to fix the parsing of BYTESIN with a not obviously constant array dimension

Browse Source
This commit is contained in:
Neil Brown 2008-02-28 16:55:11 +00:00
parent 6456dad42e
commit 1e92333778
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
frontends/ParseOccam.hs
View File

@ -1113,7 +1113,7 @@ operand'
<|> do m <- md
sBYTESIN
sLeftR
do { o <- noTypeContext operand; sRightR; return $ A.BytesInExpr m o }
(try (do { o <- noTypeContext operand; sRightR; return $ A.BytesInExpr m o }))
<|> do { t <- dataType; sRightR; return $ A.BytesInType m t }
<|> do { m <- md; sOFFSETOF; sLeftR; t <- dataType; sComma; f <- fieldName; sRightR; return $ A.OffsetOf m t f }
<|> do { m <- md; sTRUE; return $ A.True m }