akkartik
/
mu
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

a little bit more information when lookup fails 

Basically this should never, ever happen until I start reclaiming heap
memory. I believe the only reason it happens is unprotected writes to address
0 or thereabouts.
This commit is contained in:
Kartik K. Agaram 2021-05-07 15:21:48 -07:00
parent d3f17627d8
commit 540fd66473
1 changed files with 31 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
120allocate.subx
View File

@ -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
}