aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/extraction/table.mli
diff options
context:
space:
mode:
authorGravatar letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7>2002-03-04 15:48:51 +0000
committerGravatar letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7>2002-03-04 15:48:51 +0000
commit59904470f5e0be906909ec7d8e1303a2792403cd (patch)
tree39edbc9a870024f92cc11e5e478840e4595f6308 /contrib/extraction/table.mli
parent6274447373e7dc69234da3415f8d9c4d4b67ced2 (diff)
Big commit extraction:
- Changement de syntaxe (Extraction Language Toplevel/Ocaml/Haskell) - Retour des inductifs singletons et vides dans extraction.ml (extraction.ml -> actions sur le type, mlutil.ml -> conserve le type) - maintenant par defaut Recursive Extraction === Extraction "file" - kill_prop global est fait dans extraction.ml selon typage (a suivre...) git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2508 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/extraction/table.mli')
-rw-r--r--contrib/extraction/table.mli6
1 files changed, 6 insertions, 0 deletions
diff --git a/contrib/extraction/table.mli b/contrib/extraction/table.mli
index ff47bcede..a6cde3c5f 100644
--- a/contrib/extraction/table.mli
+++ b/contrib/extraction/table.mli
@@ -30,6 +30,12 @@ val check_constant : global_reference -> global_reference
val refs_of_vargl : vernac_arg list -> global_reference list
+(*s Target language. *)
+
+type lang = Ocaml | Haskell | Toplevel
+
+val lang : unit -> lang
+
(*s Table for custom inlining *)
val to_inline : global_reference -> bool