ocaml/byterun/instrtrace.h

30 lines
983 B
C
Raw Normal View History

/***********************************************************************/
/* */
/* Objective Caml */
/* */
/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */
/* */
/* Copyright 1996 Institut National de Recherche en Informatique et */
/* Automatique. Distributed only by permission. */
/* */
/***********************************************************************/
/* $Id$ */
/* Trace the instructions executed */
#ifndef _instrtrace_
#define _instrtrace_
#include "mlvalues.h"
#include "misc.h"
extern int trace_flag;
extern long icount;
void stop_here (void);
void disasm_instr (code_t pc);
#endif