summaryrefslogtreecommitdiff
path: root/extraction/extraction.v
diff options
context:
space:
mode:
Diffstat (limited to 'extraction/extraction.v')
-rw-r--r--extraction/extraction.v4
1 files changed, 4 insertions, 0 deletions
diff --git a/extraction/extraction.v b/extraction/extraction.v
index 047a9b4..34e6b0a 100644
--- a/extraction/extraction.v
+++ b/extraction/extraction.v
@@ -23,6 +23,7 @@ Require Constprop.
Require Tailcall.
Require Allocation.
Require Compiler.
+Require Cexec.
(* Standard lib *)
Require Import ExtrOcamlBasic.
@@ -106,6 +107,9 @@ Extract Constant Compiler.print_Mach => "PrintMach.print_if".
Extract Constant Compiler.print => "fun (f: 'a -> unit) (x: 'a) -> f x; x".
(*Extraction Inline Compiler.apply_total Compiler.apply_partial.*)
+(* Reference interpreter *)
+Extract Constant Cexec.do_external_function => "Interp_ext.do_external_function".
+
(* Processor-specific extraction directives *)
Load extractionMachdep.