X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=src%2Fprint.c;fp=src%2Fprint.c;h=539016e13b30e4b4151fbbdb21c723fd80f0720e;hb=c25d7ca5386582feba3d02f69a7425ea5b868bc7;hp=64a6115360db417b4ac8a9102c67e42175835fa6;hpb=6c1eef40f411ff4eec7a3f7599a81be7fae07e2a;p=muddle-interpreter.git

diff --git a/src/print.c b/src/print.c
index 64a6115..539016e 100644
--- a/src/print.c
+++ b/src/print.c
@@ -59,10 +59,10 @@ print_object (const object * o)
   switch (o->type)
     {
     case EVALTYPE_FIX32:
-      printf ("%u", o->fix32.val);
+      printf ("%d", o->fix32.val);
       break;
     case EVALTYPE_FIX64:
-      printf ("%lu", o->fix64.val);
+      printf ("%ld", o->fix64.val);
       break;
     case EVALTYPE_LIST:
       printf ("(");