0.7.13.28:

[sbcl.git] / src / runtime / coreparse.c

diff --git a/src/runtime/coreparse.c b/src/runtime/coreparse.c
index a00438c..2d03737 100644 (file)
--- a/src/runtime/coreparse.c
+++ b/src/runtime/coreparse.c
@@ -33,6 +33,8 @@
 #include "arch.h"
 #include "interr.h"
 #include "sbcl.h"
+#include "genesis/symbol.h"
+#include "genesis/static-symbols.h"
 
 unsigned char build_id[] =
 #include "../../output/build-id.tmp"
@@ -187,7 +189,7 @@ load_core_file(char *file)
                    goto losing_build_id;
                for (i = 0; i < remaining_len; ++i) {
                    FSHOW((stderr, "ptr[%d] = char = %d, expected=%d\n",
-                          ptr[i], i, build_id[i]));
+                          i, ptr[i], build_id[i]));
                    if (ptr[i] != build_id[i])
                        goto losing_build_id;
                }