diff options
| author | Antonin Décimo <antonin.decimo@gmail.com> | 2020-07-17 09:38:28 +0200 |
|---|---|---|
| committer | Antonin Décimo <antonin.decimo@gmail.com> | 2020-07-17 19:49:27 +0200 |
| commit | d2d2e0c197c83d76f4708ac184213b9a4bf5e670 (patch) | |
| tree | 95c725361fa3a6a4d5ba90e248c268004faad625 /runtime | |
| parent | c944d64234d16686f007ab07946abfa0d99a784a (diff) | |
| download | ocaml-d2d2e0c197c83d76f4708ac184213b9a4bf5e670.tar.gz | |
Fix invalid format specifiers
Diffstat (limited to 'runtime')
| -rw-r--r-- | runtime/instrtrace.c | 2 | ||||
| -rw-r--r-- | runtime/memory.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/runtime/instrtrace.c b/runtime/instrtrace.c index 3e5cbb56e1..2760475ed5 100644 --- a/runtime/instrtrace.c +++ b/runtime/instrtrace.c @@ -149,7 +149,7 @@ char * caml_instr_string (code_t pc) snprintf(buf, sizeof(buf), "%s %d, %d", nam, pc[0], pc[1]); break; case SWITCH: - snprintf(buf, sizeof(buf), "SWITCH sz%#lx=%ld::ntag%ld nint%ld", + snprintf(buf, sizeof(buf), "SWITCH sz%#lx=%ld::ntag%lu nint%lu", (long) pc[0], (long) pc[0], (unsigned long) pc[0] >> 16, (unsigned long) pc[0] & 0xffff); break; diff --git a/runtime/memory.c b/runtime/memory.c index 517ea16f18..a58c689767 100644 --- a/runtime/memory.c +++ b/runtime/memory.c @@ -429,7 +429,7 @@ void caml_shrink_heap (char *chunk) Caml_state->stat_heap_wsz -= Wsize_bsize (Chunk_size (chunk)); caml_gc_message (0x04, "Shrinking heap to %" - ARCH_INTNAT_PRINTF_FORMAT "uk words\n", + ARCH_INTNAT_PRINTF_FORMAT "dk words\n", Caml_state->stat_heap_wsz / 1024); #ifdef DEBUG |