summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>2001-02-19 12:40:33 +0000
committerXavier Leroy <xavier.leroy@inria.fr>2001-02-19 12:40:33 +0000
commit913d33aa9ec4b999a9fad1f7792bf83d99cda37b (patch)
tree2fb9658e660298bc869f7b166d606c521fb5c96b
parent4b84fcf843140a9a3f9ccd86036b7a314dcd216a (diff)
Backtrace
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3423 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
-rw-r--r--byterun/startup.h21
1 files changed, 21 insertions, 0 deletions
diff --git a/byterun/startup.h b/byterun/startup.h
new file mode 100644
index 000000000..86379c728
--- /dev/null
+++ b/byterun/startup.h
@@ -0,0 +1,21 @@
+#ifndef _startup_
+#define _startup_
+
+#include "misc.h"
+#include "exec.h"
+
+extern void caml_main(char **argv);
+extern void caml_startup_code(code_t code, asize_t code_size,
+ char *data, char **argv);
+
+enum { FILE_NOT_FOUND = -1, BAD_BYTECODE = -2 };
+
+extern int attempt_open(char **name, struct exec_trailer *trail,
+ int do_open_script);
+extern void read_section_descriptors(int fd, struct exec_trailer *trail);
+extern int32 seek_optional_section(int fd, struct exec_trailer *trail,
+ char *name);
+extern int32 seek_section(int fd, struct exec_trailer *trail, char *name);
+
+
+#endif