summary refs log tree commit diff
path: root/quine.asm
diff options
context:
space:
mode:
authorIrene Knapp <ireneista@irenes.space>2026-05-28 21:22:58 -0700
committerIrene Knapp <ireneista@irenes.space>2026-05-28 21:22:58 -0700
commit3f83a17851b8e93e4d5dbac94b10a6afd750dbee (patch)
tree8b88024fabaf86783f5c58718dc2fb9c6c79ffda /quine.asm
parent0f3c90d8c67c7150feed36a1e620a6aa68f987a7 (diff)
move next-newer-entry-in and oldest-entry-in into dynamic.e
it's starting to get concerning how all this stuff needs to go in quine.asm but hopefully the hex transform will fix it

Force-Push: yes
Change-Id: I840e77c96fa0555bc01b9604d09f5ac4903d48bf
Diffstat (limited to 'quine.asm')
-rw-r--r--quine.asm5
1 files changed, 5 insertions, 0 deletions
diff --git a/quine.asm b/quine.asm
index 3002cab..6027e5e 100644
--- a/quine.asm
+++ b/quine.asm
@@ -12048,6 +12048,11 @@ defword boot_source, 0x40
   dq ": oldest-entry                                                  "
   dq "  latest @ { dup @ } { @ } while ;                              "
 
+  dq ": oldest-entry-in                                               "
+  dq "  dup                                                           "
+  dq "  dup { { dup @ } { @ } while } if                              "
+  dq "  dup 3roll = { drop 0 } if ;                                   "
+
   dq ": next-newer-entry                                              "
   dq "  latest @                                                      "
   dq "  2dup = { 2drop 0 exit } if                                    "