diff options
author | Damien Doligez <damien.doligez-inria.fr> | 1996-12-11 19:57:35 +0000 |
---|---|---|
committer | Damien Doligez <damien.doligez-inria.fr> | 1996-12-11 19:57:35 +0000 |
commit | c917892b240a8852e5233e0152ba3cde34a6d164 (patch) | |
tree | a299ddbaf55b3c6b17715260704bc442016b1afb /byterun/fix_code.c | |
parent | e382f2308cfc9d5b22f341f47f76ec1afbf58dc5 (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.c | 7 |
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) { |