X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fcore.h;h=57df1cbc8c878932094f8b2940a7888bbe506641;hb=baa0eaf21221dc564088c37b228c620c298aeaa1;hp=385d8a61401423b34d8c49de277bfda443979779;hpb=503a50f07740b52908f630b0492cf56556f1a792;p=sbcl.git

diff --git a/src/runtime/core.h b/src/runtime/core.h
index 385d8a6..57df1cb 100644
--- a/src/runtime/core.h
+++ b/src/runtime/core.h
@@ -12,10 +12,11 @@
 #ifndef _CORE_H_
 #define _CORE_H_
 
+#include "sbcl.h"
 #include "runtime.h"
 
 struct ndir_entry {
-#ifndef alpha
+#ifndef LISP_FEATURE_ALPHA
     long identifier;
     long nwords;
     long data_page;
@@ -30,6 +31,14 @@ struct ndir_entry {
 #endif
 };
 
-extern lispobj load_core_file(char *file);
+extern lispobj load_core_file(char *file, os_vm_offset_t offset);
+extern os_vm_offset_t search_for_embedded_core(char *file);
+
+/* arbitrary string identifying this build, embedded in .core files to
+ * prevent people mismatching a runtime built e.g. with :SB-SHOW
+ * against a .core built without :SB-SHOW (or against various grosser
+ * mismatches, e.g. a .core built with an old version of the code
+ * against a runtime with patches which add new C code) */
+extern unsigned char build_id[];
 
 #endif