ocaml/byterun/fix_code.h

33 lines
1.1 KiB
C

/***********************************************************************/
/* */
/* Objective Caml */
/* */
/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */
/* */
/* Copyright 1996 Institut National de Recherche en Informatique et */
/* Automatique. Distributed only by permission. */
/* */
/***********************************************************************/
/* $Id$ */
/* Translate a block of bytecode (endianness switch, threading). */
#ifndef _fix_code_
#define _fix_code_
#include "config.h"
#include "misc.h"
#include "mlvalues.h"
#ifdef THREADED_CODE
extern void ** instr_table;
#endif
void fixup_endianness P((code_t code, asize_t len));
void thread_code P((code_t code, asize_t len));
#endif