diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-28 21:07:55 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-28 21:07:55 -0700 |
| commit | 0f3c90d8c67c7150feed36a1e620a6aa68f987a7 (patch) | |
| tree | bc80e407fd8508afdd78f99e8dae5e958a454622 /labels.e | |
| parent | fb57c4ae52e9836f52e4fc5d4999824ebdd2c57c (diff) | |
moved pack-raw-string into core.e
Force-Push: yes Change-Id: I0940c0c21580e810716a5f61b95fd520c464ab9e
Diffstat (limited to 'labels.e')
| -rw-r--r-- | labels.e | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/labels.e b/labels.e index 6175128..0d2b60d 100644 --- a/labels.e +++ b/labels.e @@ -50,11 +50,6 @@ ~ Most of the time, the shorthand words L@' and L!' will be all you need to ~ use from your own code. -~ TODO this should go somewhere else :) -~ (current output point, string pointer --) -: pack-raw-string - { unpack8 dup } { 3roll swap pack8 swap } while drop drop ; - ~ The labels data structure is a linked list of dictionary entries, with ~ the same header format as the main Evocation dictionary, but instead of ~ being executable, each holds two words of data: status bits, and a value, |