diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-22 00:29:03 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-22 00:29:03 -0700 |
| commit | ed702c3b88953112a3682c818a6e801549e1b461 (patch) | |
| tree | f53e5e9c1ac40250552ba0f9cb6e627cd8caeb9e /transform.e | |
| parent | 5ae0fdad3c7df2fc02acfc3b8f36d96c5d07bcd4 (diff) | |
it runs!!!!!! it interactively reads input and everything
only some of that actually works, but hey, it's a start Force-Push: yes Change-Id: Ib82beb695be1a18de8aaaf3040b7c632851c6002
Diffstat (limited to 'transform.e')
| -rw-r--r-- | transform.e | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/transform.e b/transform.e index 4d7c32c..7b82eae 100644 --- a/transform.e +++ b/transform.e @@ -747,6 +747,9 @@ allocate-transform-state s" transform-state" variable dup s" compute-next-buffer-free-block" stringcmp 0 = { drop 1 exit } if dup s" refill-input-buffer-from-stdin" stringcmp 0 = { drop -1 exit } if dup s" main-input-buffer" stringcmp 0 = { drop 1 exit } if + dup s" consume" stringcmp 0 = { drop 0 exit } if + dup s" peek" stringcmp 0 = { drop 1 exit } if + dup s" key" stringcmp 0 = { drop 1 exit } if ~ From interpret.e. dup s" unroll-past-string" stringcmp 0 = { drop 0 exit } if |