about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--120allocate.subx32
1 files changed, 31 insertions, 1 deletions
diff --git a/120allocate.subx b/120allocate.subx
index fd5b5490..75712711 100644
--- a/120allocate.subx
+++ b/120allocate.subx
@@ -252,7 +252,37 @@ $lookup:end:
     c3/return
 
 $lookup:abort:
-    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "lookup: failed" 3 0)  # 3=cyan
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "lookup failed: (" 3 0)  # 3=cyan
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *(ebp+8) 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 ", " 3 0)
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *(ebp+0xc) 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 ") -> " 3 0)
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 ". Contents of a few words starting from address 0: " 3 0)
+    b8/copy-to-eax 0/imm32
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 2 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
+    40/increment-eax
+    (draw-int32-hex-wrapping-right-then-down-from-cursor-over-full-screen 0 *eax 3 0)
+    (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 " " 2 0)
     {
       eb/jump loop/disp8
     }