l4/pkg/ocaml/contrib/byterun/backtrace.h

   1 /***********************************************************************/
   2 /*                                                                     */
   3 /*                           Objective Caml                            */
   4 /*                                                                     */
   5 /*            Xavier Leroy, projet Cristal, INRIA Rocquencourt         */
   6 /*                                                                     */
   7 /*  Copyright 2001 Institut National de Recherche en Informatique et   */
   8 /*  en Automatique.  All rights reserved.  This file is distributed    */
   9 /*  under the terms of the GNU Library General Public License, with    */
  10 /*  the special exception on linking described in file ../LICENSE.     */
  11 /*                                                                     */
  12 /***********************************************************************/
  13
  14 /* $Id: backtrace.h 9300 2009-06-18 11:17:16Z xclerc $ */
  15
  16 #ifndef CAML_BACKTRACE_H
  17 #define CAML_BACKTRACE_H
  18
  19 #include "mlvalues.h"
  20
  21 CAMLextern int caml_backtrace_active;
  22 CAMLextern int caml_backtrace_pos;
  23 CAMLextern code_t * caml_backtrace_buffer;
  24 CAMLextern value caml_backtrace_last_exn;
  25 CAMLextern char * caml_cds_file;
  26
  27 CAMLprim value caml_record_backtrace(value vflag);
  28 #ifndef NATIVE_CODE
  29 extern void caml_stash_backtrace(value exn, code_t pc, value * sp);
  30 #endif
  31 CAMLextern void caml_print_exception_backtrace(void);
  32
  33 #endif /* CAML_BACKTRACE_H */