shithub: femtolisp

Info  •  Files  •  Log  •  Branches

cvalue_print: use %p instead of 0x%08llux with casting

--- a/print.c

+++ b/print.c

@@ -816,8 +816,7 @@

         void *fptr = *(void**)data;

         label = (value_t)ptrhash_get(&reverse_dlsym_lookup_table, cv);

         if (label == (value_t)HT_NOTFOUND) {

-            HPOS += ios_printf(f, "#<builtin @0x%08llux>",

-                               (uvlong)(builtin_t)fptr);

+            HPOS += ios_printf(f, "#<builtin @%p>", fptr);

         }

         else {

             if (print_princ) {