]> rtime.felk.cvut.cz Git - l4.git/blob - l4/pkg/ocaml/ocaml/contrib/byterun/sys.h
Update
[l4.git] / l4 / pkg / ocaml / ocaml / contrib / byterun / sys.h
1 /***********************************************************************/
2 /*                                                                     */
3 /*                           Objective Caml                            */
4 /*                                                                     */
5 /*            Xavier Leroy, projet Cristal, INRIA Rocquencourt         */
6 /*                                                                     */
7 /*  Copyright 1996 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: sys.h 7919 2007-02-25 12:38:36Z xleroy $ */
15
16 #ifndef CAML_SYS_H
17 #define CAML_SYS_H
18
19 #include "misc.h"
20
21 #define NO_ARG Val_int(0)
22
23 CAMLextern void caml_sys_error (value);
24 CAMLextern void caml_sys_io_error (value);
25 extern void caml_sys_init (char * exe_name, char ** argv);
26 CAMLextern value caml_sys_exit (value);
27
28 extern char * caml_exe_name;
29
30 #endif /* CAML_SYS_H */