4 + 2 = 6

2026-05-16 03:02:25 -06:00
parent 0bb66acae0
commit 466e2a38a9
10 changed files with 113 additions and 35 deletions
@@ -5,7 +5,7 @@ SCM scm_write (SCM x) {
  if (SCM_IMP (x)) {
    printf ("#<immediate %ld>\n", SCM_UNPACK (x) >> 2);
  } else {
-    printf ("#<heap object %lx>\n", SCM_UNPACK(x));
+    printf ("#<heap object 0x%016lx>\n", SCM_UNPACK (x));
  }
  return SCM_PACK(NULL);
 }