diff options
author | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-03-04 15:48:51 +0000 |
---|---|---|
committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-03-04 15:48:51 +0000 |
commit | 59904470f5e0be906909ec7d8e1303a2792403cd (patch) | |
tree | 39edbc9a870024f92cc11e5e478840e4595f6308 /contrib/extraction/table.mli | |
parent | 6274447373e7dc69234da3415f8d9c4d4b67ced2 (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.mli | 6 |
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 |