aboutsummaryrefslogtreecommitdiff
path: root/theories/extraction
diff options
context:
space:
mode:
authorMaxime Dénès2020-02-03 18:19:42 +0100
committerMaxime Dénès2020-07-06 11:22:43 +0200
commit0ea2d0ff4ed84e1cc544c958b8f6e98f6ba2e9b6 (patch)
treefbad060c3c2e29e81751dea414c898b5cb0fa22d /theories/extraction
parentcf388fdb679adb88a7e8b3122f65377552d2fb94 (diff)
Primitive persistent arrays
Persistent arrays expose a functional interface but are implemented using an imperative data structure. The OCaml implementation is based on Jean-Christophe Filliâtre's. Co-authored-by: Benjamin Grégoire <Benjamin.Gregoire@inria.fr> Co-authored-by: Gaëtan Gilbert <gaetan.gilbert@skyskimmer.net>
Diffstat (limited to 'theories/extraction')
-rw-r--r--theories/extraction/ExtrOCamlPArray.v26
1 files changed, 26 insertions, 0 deletions
diff --git a/theories/extraction/ExtrOCamlPArray.v b/theories/extraction/ExtrOCamlPArray.v
new file mode 100644
index 0000000000..67646bdb53
--- /dev/null
+++ b/theories/extraction/ExtrOCamlPArray.v
@@ -0,0 +1,26 @@
+(************************************************************************)
+(* * The Coq Proof Assistant / The Coq Development Team *)
+(* v * INRIA, CNRS and contributors - Copyright 1999-2019 *)
+(* <O___,, * (see CREDITS file for the list of authors) *)
+(* \VV/ **************************************************************)
+(* // * This file is distributed under the terms of the *)
+(* * GNU Lesser General Public License Version 2.1 *)
+(* * (see LICENSE file for the text of the license) *)
+(************************************************************************)
+
+(** Extraction to OCaml of persistent arrays. *)
+
+From Coq Require PArray Extraction.
+
+(** Primitive types and operators. *)
+Extract Constant PArray.array "'a" => "'a Parray.t".
+Extraction Inline PArray.array.
+(* Otherwise, the name conflicts with the primitive OCaml type [array] *)
+
+Extract Constant PArray.make => "Parray.make".
+Extract Constant PArray.get => "Parray.get".
+Extract Constant PArray.default => "Parray.default".
+Extract Constant PArray.set => "Parray.set".
+Extract Constant PArray.length => "Parray.length".
+Extract Constant PArray.copy => "Parray.copy".
+Extract Constant PArray.reroot => "Parray.reroot".