From 133865cbdf90a9e5a3b08e260a57f3aa97981f2e Mon Sep 17 00:00:00 2001 From: zinc Date: Wed, 14 Oct 2026 16:07:23 +0330 Subject: memdebug: obj_base finds the header from the buddy size classes, not a 64-word scan; regression program --- tests/test.sh | 1 + 1 file changed, 1 insertion(+) (limited to 'tests/test.sh') diff --git a/tests/test.sh b/tests/test.sh index a1a5453..16abf91 100755 --- a/tests/test.sh +++ b/tests/test.sh @@ -188,6 +188,7 @@ ABC" "$l o3 lifts byte loads and stores" chk "$($vm < tests/programs/strings.zc)" "hi! 3 3 104 i! 1 1 1 -42 42 -42 11 1 -9223372036854775808 0 1 3 10 1 1 1 W ab" "$l byte strings" chk "$($vm < tests/programs/share.zc)" "1 2 1 4 1 1 1 1 42 1 1 1 6 0" "$l shared cons cells" chk "$($vm < tests/programs/share_dbg.zc)" "7 1" "$l memdebug accepts a shared cell" + chk "$($vm < tests/programs/memdebug_interior.zc | md5sum)" "$(md5sum < tests/programs/memdebug_interior.expected)" "$l memdebug finds the block of a deep interior pointer" chk "$($vm < tests/programs/global_transfer.zc)" "5 9" "$l an m or u owner stored in a global is transferred" chk "$($vm < tests/programs/closure_result.zc)" "8 1.500000" "$l a closure with a declared result type" chk "$($vm < examples/strings.zc)" "hello, zc -- cgit v1.2.3