small fixes in perl modules

[libucw.git] / lib / conf-dump.c

diff --git a/lib/conf-dump.c b/lib/conf-dump.c
index c4ac16bb076f847ff1a83c282429871057694894..f4af30ac626514b0e883403b80274005807c866e 100644 (file)
--- a/lib/conf-dump.c
+++ b/lib/conf-dump.c
@@ -27,7 +27,7 @@ dump_basic(struct fastbuf *fb, void *ptr, enum cf_type type, union cf_union *u)
 {
   switch (type) {
     case CT_INT:       bprintf(fb, "%d ", *(uns*)ptr); break;
-    case CT_U64:       bprintf(fb, "%llu ", *(u64*)ptr); break;
+    case CT_U64:       bprintf(fb, "%llu ", (long long) *(u64*)ptr); break;
     case CT_DOUBLE:    bprintf(fb, "%lg ", *(double*)ptr); break;
     case CT_IP:                bprintf(fb, "%08x ", *(uns*)ptr); break;
     case CT_STRING: