summary refs log tree commit diff
path: root/quine.asm
diff options
context:
space:
mode:
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                                    "