diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-20 22:12:57 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-20 22:12:57 -0700 |
| commit | 54d5bfe751d8489ae727eec1cb8d4a9a2279a5e5 (patch) | |
| tree | c727dccb9f50f5a74c4d541a3fdf38a89cf379f3 /transform.e | |
| parent | 272c9cf16bbca81ff0e15840c4dc8fd0bbce3ad8 (diff) | |
tidied away core-plus.e
it's merged into core now. that just made the most sense... a couple of its combinators are too useful to not use once you know about them Force-Push: yes Change-Id: I3857f353a8603960bebbf34f24572e3d5815f0de
Diffstat (limited to 'transform.e')
| -rw-r--r-- | transform.e | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/transform.e b/transform.e index 2d75f9f..22c4ecf 100644 --- a/transform.e +++ b/transform.e @@ -385,6 +385,8 @@ allocate-transform-state s" transform-state" variable dup s" -" stringcmp 0 = { drop -1 exit } if dup s" *" stringcmp 0 = { drop -1 exit } if dup s" /%" stringcmp 0 = { drop 0 exit } if + dup s" 1+" stringcmp 0 = { drop 0 exit } if + dup s" 1-" stringcmp 0 = { drop 0 exit } if dup s" =" stringcmp 0 = { drop -1 exit } if dup s" !=" stringcmp 0 = { drop -1 exit } if dup s" >" stringcmp 0 = { drop -1 exit } if @@ -443,10 +445,6 @@ allocate-transform-state s" transform-state" variable dup s" align-size" stringcmp 0 = { drop -1 exit } if dup s" unpackalign" stringcmp 0 = { drop -1 exit } if dup s" crash" stringcmp 0 = { drop 0 exit } if - - ~ From core-plus.e. - dup s" 1-" stringcmp 0 = { drop 0 exit } if - dup s" 1+" stringcmp 0 = { drop 0 exit } if dup s" max" stringcmp 0 = { drop -1 exit } if dup s" min" stringcmp 0 = { drop -1 exit } if dup s" over" stringcmp 0 = { drop 1 exit } if |