summaryrefslogtreecommitdiff
path: root/extraction
diff options
context:
space:
mode:
Diffstat (limited to 'extraction')
-rw-r--r--extraction/extraction.v5
1 files changed, 2 insertions, 3 deletions
diff --git a/extraction/extraction.v b/extraction/extraction.v
index 29e6863..0f23264 100644
--- a/extraction/extraction.v
+++ b/extraction/extraction.v
@@ -112,6 +112,8 @@ Extract Constant Cabs.cabsloc =>
byteno: int;
ident : int;
}".
+Extract Constant Cabs.string => "String.t".
+Extract Constant Cabs.char_code => "int64".
(* Int31 *)
Extract Inductive Int31.digits => "bool" [ "false" "true" ].
@@ -122,9 +124,6 @@ Extract Constant Int31.compare31 => "Camlcoq.Int31.compare".
Extract Constant Int31.On => "0".
Extract Constant Int31.In => "1".
-(* String in Cabs *)
-Extract Constant Cabs.string => "String.t".
-
(* Processor-specific extraction directives *)
Load extractionMachdep.