Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
13 lines (12 sloc) 645 Bytes
diff --git a/bytecomp/meta.mli b/bytecomp/meta.mli
index a5bc011..7b469fd 100644
--- a/bytecomp/meta.mli
+++ b/bytecomp/meta.mli
@@ -26,3 +26,7 @@ external invoke_traced_function : Obj.t -> Obj.t -> Obj.t -> Obj.t
= "caml_invoke_traced_function"
external get_section_table : unit -> (string * Obj.t) list
= "caml_get_section_table"
+external add_debug_info : string -> int -> Instruct.debug_event list array -> unit
+ = "caml_add_debug_info"
+external remove_debug_info : string -> unit
+ = "caml_remove_debug_info"