ocaml/byterun/instrtrace.h

32 lines
1.1 KiB
C
Raw Normal View History

/***********************************************************************/
/* */
/* Objective Caml */
/* */
/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */
/* */
/* Copyright 1996 Institut National de Recherche en Informatique et */
/* en Automatique. All rights reserved. This file is distributed */
/* under the terms of the GNU Library General Public License, with */
/* the special exception on linking described in file ../LICENSE. */
/* */
/***********************************************************************/
/* $Id$ */
/* Trace the instructions executed */
#ifndef _instrtrace_
#define _instrtrace_
#include "mlvalues.h"
#include "misc.h"
extern int caml_trace_flag;
extern long caml_icount;
void caml_stop_here (void);
void caml_disasm_instr (code_t pc);
#endif