fix tokenizing of numbers and expressions of offset
This commit is contained in:
@@ -33,8 +33,8 @@ $doublequote = \"
|
|||||||
@linecomment = ";;" $linechar* \x0A
|
@linecomment = ";;" $linechar* \x0A
|
||||||
@startblockcomment = "(;"
|
@startblockcomment = "(;"
|
||||||
@endblockcomment = ";)"
|
@endblockcomment = ";)"
|
||||||
@num = $digit (\_? $digit*)
|
@num = $digit (\_? $digit*)*
|
||||||
@hexnum = $hexdigit (\_? $hexdigit*)
|
@hexnum = $hexdigit (\_? $hexdigit*)*
|
||||||
@id = "$" $idchar+
|
@id = "$" $idchar+
|
||||||
@floatfrac = @num "." (@num)?
|
@floatfrac = @num "." (@num)?
|
||||||
@exp = [Ee] $sign? @num
|
@exp = [Ee] $sign? @num
|
||||||
|
|||||||
@@ -960,7 +960,7 @@ start :: { StartFunction }
|
|||||||
-- but collection of testcases omits 'offset' in this position
|
-- but collection of testcases omits 'offset' in this position
|
||||||
-- I am going to support both options for now, but maybe it has to be updated in future.
|
-- I am going to support both options for now, but maybe it has to be updated in future.
|
||||||
offsetexpr :: { [Instruction] }
|
offsetexpr :: { [Instruction] }
|
||||||
: 'offset' foldedinstr ')' { $2 }
|
: 'offset' list(foldedinstr) ')' { concat $2 }
|
||||||
| foldedinstr1 { $1 }
|
| foldedinstr1 { $1 }
|
||||||
|
|
||||||
elemsegment :: { ElemSegment }
|
elemsegment :: { ElemSegment }
|
||||||
|
|||||||
Reference in New Issue
Block a user