From 452060947945afca6a7f7e76b0aa01241141e168 Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Sun, 23 Jul 2023 14:51:36 -0700
Subject: [PATCH] Print the bad Lisp pointer as well as where it came from.

---
 src/gcfinal.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/gcfinal.c b/src/gcfinal.c
index a3c144e..21d646d 100644
--- a/src/gcfinal.c
+++ b/src/gcfinal.c
@@ -157,7 +157,7 @@ LispPTR findptrsbuffer(LispPTR ptr) {
     if (ptr == bptr->vmempage)
       return (LAddrFromNative(bptr));
     else {
-      if (bptr->sysnext & 0xF0000000) printf("findptrsbuffer: would have failed %p\n", bptr);
+      if (bptr->sysnext & 0xF0000000) printf("findptrsbuffer: would have failed %p 0x%X\n", bptr, bptr->sysnext);
       bptr = (struct buf *)NativeAligned4FromLAddr(bptr->sysnext);
     }
   }