diff options
| author | Irene Knapp <ireneista@irenes.space> | 2026-05-28 21:51:40 -0700 |
|---|---|---|
| committer | Irene Knapp <ireneista@irenes.space> | 2026-05-28 21:51:40 -0700 |
| commit | 9f73b1ce40c654f17fa49a8b075dc44483052c4a (patch) | |
| tree | f6d68576ef62c44cd991e1d37fd93f3fa0b10351 /to-consider.e | |
| parent | e13473675c30ddfbacd42a716f166026b37402fb (diff) | |
yeah the litpack* variants won't be needed again
they were not a very effective optimization in light of the log-load stuff Force-Push: yes Change-Id: Ie0b51dddfda2b44c986a078580cc15be88193755
Diffstat (limited to 'to-consider.e')
| -rw-r--r-- | to-consider.e | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/to-consider.e b/to-consider.e deleted file mode 100644 index 109464b..0000000 --- a/to-consider.e +++ /dev/null @@ -1,38 +0,0 @@ -~ This file is for stuff that should probably be deleted after flatassembler -~ is removed, but is being kept here temporarily so that those decisions can -~ be made in an organized fashion. - - -~ In the interests of reducing our executable's size, since a lot of it goes -~ to pack* invocations, we define words that combine lit with pack*. This -~ shaves roughly 700 bytes as of when it was added. -~ -~ TODO are these really used anymore? also, they're the only thing beforenext -~ is used for. note that they can't go in core.e because ' is not compatible -~ with the label transform. -~ -~ (output point, value -- output point) -: litpack64 - [ here @ - lods64 - :rax push-reg64 - ' pack64 entry-to-execution-token pack-beforenext - here ! ] ;asm -: litpack32 - [ here @ - lods64 - :rax push-reg64 - ' pack32 entry-to-execution-token pack-beforenext - here ! ] ;asm -: litpack16 - [ here @ - lods64 - :rax push-reg64 - ' pack16 entry-to-execution-token pack-beforenext - here ! ] ;asm -: litpack8 - [ here @ - lods64 - :rax push-reg64 - ' pack8 entry-to-execution-token pack-beforenext - here ! ] ;asm |