diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-08-28 05:28:35 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-08-28 20:12:35 -0700 |
| commit | 6e0227328154e18810d8dfa4489bf84c9c15cbf7 (patch) | |
| tree | cdc3454338b96cadbaec6a15533ecdb9c4b7b3a6 /core.e | |
| parent | 9eb7d0fabb2a786d2aa9f56244360afb381e7c18 (diff) | |
change the transforms to take their end delimiters as parameters
this will not be useful until read-to-buffer also does, but it's a step towards that Force-Push: yes Change-Id: Icf03088c9e52e427a5c130949e9ba85655d59044
Diffstat (limited to 'core.e')
| -rw-r--r-- | core.e | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/core.e b/core.e index 1effc11..2aabc6f 100644 --- a/core.e +++ b/core.e @@ -1279,6 +1279,8 @@ here ! drop ; : over swap dup 3unroll ; + +~ 0 pick is equivalent to dup. 1 pick is equivlent to over. : pick 2 + dup roll dup 3roll unroll ; ~ Standard Forth doesn't have equivalents of our ndrop and ndup. The HP |