summaryrefslogtreecommitdiffstats
path: root/byterun/fix_code.c
diff options
context:
space:
mode:
authorDamien Doligez <damien.doligez-inria.fr>1996-12-11 19:57:35 +0000
committerDamien Doligez <damien.doligez-inria.fr>1996-12-11 19:57:35 +0000
commitc917892b240a8852e5233e0152ba3cde34a6d164 (patch)
treea299ddbaf55b3c6b17715260704bc442016b1afb /byterun/fix_code.c
parente382f2308cfc9d5b22f341f47f76ec1afbf58dc5 (diff)
Makefile.Mac: ajout de debugger.o
interp.a: changement de thread_code fixcode.c: fix ARCH_BIG_ENDIAN git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1224 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/fix_code.c')
-rw-r--r--byterun/fix_code.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/byterun/fix_code.c b/byterun/fix_code.c
index 5713330d6..189b1b48c 100644
--- a/byterun/fix_code.c
+++ b/byterun/fix_code.c
@@ -16,10 +16,10 @@
#include "config.h"
#include "debugger.h"
#include "fix_code.h"
+#include "instruct.h"
#include "memory.h"
#include "misc.h"
#include "mlvalues.h"
-#include "instruct.h"
#include "reverse.h"
#ifdef HAS_UNISTD
#include <unistd.h>
@@ -41,7 +41,7 @@ void load_code(fd, len)
start_code = (code_t) stat_alloc(code_size);
if (read(fd, (char *) start_code, code_size) != code_size)
fatal_error("Fatal error: truncated bytecode file.\n");
-#ifdef BIG_ENDIAN
+#ifdef ARCH_BIG_ENDIAN
fixup_endianness(start_code, code_size);
#endif
if (debugger_in_use) {
@@ -108,7 +108,8 @@ void thread_code (code_t code, asize_t len)
for (p = code; p < code + len; /*nothing*/) {
opcode_t instr = *p;
if (instr < 0 || instr > STOP){
- fatal_error_arg ("Fatal error: bad opcode (%lx)\n", (void *) instr);
+ fatal_error_arg ("Fatal error in fix_code: bad opcode (%lx)\n",
+ (void *) instr);
}
*p++ = (opcode_t)((unsigned long)(instr_table[instr]));
if (instr == SWITCH) {