aboutsummaryrefslogtreecommitdiff
path: root/kernel/nativelibrary.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/nativelibrary.ml')
-rw-r--r--kernel/nativelibrary.ml7
1 files changed, 0 insertions, 7 deletions
diff --git a/kernel/nativelibrary.ml b/kernel/nativelibrary.ml
index 6749dbfdba..f33e1eaa64 100644
--- a/kernel/nativelibrary.ml
+++ b/kernel/nativelibrary.ml
@@ -72,10 +72,3 @@ let dump_library mp dp env mod_expr =
let mlcode = add_header_comment (List.rev mlcode) time_info in
mlcode, get_symbols_tbl ()
| _ -> assert false
-
-
-let compile_library dir code load_path f =
- let header = mk_library_header dir in
- let ml_filename = f^".native" in
- write_ml_code ml_filename ~header code;
- fst (call_compiler ml_filename load_path)