2001-06-15 07:22:38 -07:00
|
|
|
/***********************************************************************/
|
|
|
|
/* */
|
|
|
|
/* Objective Caml */
|
|
|
|
/* */
|
|
|
|
/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */
|
|
|
|
/* */
|
|
|
|
/* Copyright 2001 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. */
|
|
|
|
/* */
|
|
|
|
/***********************************************************************/
|
|
|
|
|
|
|
|
/* $Id$ */
|
|
|
|
|
|
|
|
#ifndef _printexc_
|
|
|
|
#define _printexc_
|
|
|
|
|
|
|
|
|
|
|
|
#include "misc.h"
|
|
|
|
#include "mlvalues.h"
|
|
|
|
|
2001-08-28 07:47:48 -07:00
|
|
|
CAMLextern char * format_caml_exception (value);
|
2001-06-15 07:22:38 -07:00
|
|
|
void fatal_uncaught_exception (value) Noreturn;
|
|
|
|
|
|
|
|
|
|
|
|
#endif /* _printexc_ */
|