Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/Tokenize-a-string-with-escaping/TMG/tokenize-a-string-with-escaping.tmg
+++ b/Task/Tokenize-a-string-with-escaping/TMG/tokenize-a-string-with-escaping.tmg
@ -0,0 +1,15 @@
+prog:   char(sep) *
+        char(esc) *
+str:    smark
+token:  forw/outp
+        ( [ch==esc?] char(ch) any(!<<>>) token
+        | [ch==sep?] char(ch) outp str
+        | any(!<<>>) token );
+outp:   parse(( scopy = { <"> 1 <"> * } ));
+forw:   peek/chkeof;
+peek:   [ch=0] char(ch) fail;
+chkeof: ( [ch?] succ | fail );
+
+ch:     0;
+sep:    0;
+esc:    0;