shithub: femtolisp

Info  •  Files  •  Log  •  Branches

fix uint64 printint

--- a/print.c

+++ b/print.c

@@ -706,9 +706,9 @@

              ) {

         uint64_t ui64 = *(uint64_t*)data;

         if (weak || print_princ)

-            HPOS += ios_printf(f, "%llu", ui64);

+            HPOS += ios_printf(f, "%llud", ui64);

         else

-            HPOS += ios_printf(f, "#%s(%llu)", symbol_name(type), ui64);

+            HPOS += ios_printf(f, "#%s(%llud)", symbol_name(type), ui64);

     }

     else if (issymbol(type)) {

         // handle other integer prims. we know it's smaller than uint64