Parse comments during runic

This commit is contained in:
neauoire 2023-12-07 11:06:02 -08:00
parent fa30caee56
commit be864917ad
1 changed files with 3 additions and 5 deletions

View File

@ -85,8 +85,6 @@
@|tokenizer )
@parse-token ( t* -- )
LDAk [ LIT 28 ] EQU ?parse-comment
( | runic )
LDAk ,&rune STR
;runes/end ;runes
&l ( -- )
@ -321,7 +319,6 @@
@|helpers )
@get-hex ( str* -- value* )
is-hex ?{ ;err/number !<set-error> }
[ LIT2r 0000 ]
&w ( -- )
( acc ) [ LITr 40 ] SFT2r
@ -505,14 +502,15 @@
@runes [
"| =lib/padabs "$ =lib/padrel
"} =lib/lambda "( =parse-comment
"@ =lib/toplab "& =lib/sublab
", =lib/litrel "_ =lib/rawrel
". =lib/litzep "- =lib/rawzep
"; =lib/litabs "= =lib/rawabs
"? =lib/litjci "! =lib/litjmi
5b =lib/ignore 5d =lib/ignore
"} =lib/lambda "# =lib/lithex
"" =lib/rawstr "~ =lib/inc ]
"# =lib/lithex "" =lib/rawstr
"~ =lib/inc ]
&end
(
@|memory )