diff options
| author | filliatr | 2001-05-14 14:49:58 +0000 |
|---|---|---|
| committer | filliatr | 2001-05-14 14:49:58 +0000 |
| commit | 4645fdff5c79865a89444353d4bc6b4b3728fb6f (patch) | |
| tree | fed077136746d56e74c3b4929072837a2972413e /contrib/extraction/ocaml.mli | |
| parent | 3e5ac6441c5241b5082222f139ba33411b28d300 (diff) | |
mise en place extraction haskell
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1751 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/extraction/ocaml.mli')
| -rw-r--r-- | contrib/extraction/ocaml.mli | 17 |
1 files changed, 16 insertions, 1 deletions
diff --git a/contrib/extraction/ocaml.mli b/contrib/extraction/ocaml.mli index 74d7510514..057d909fa4 100644 --- a/contrib/extraction/ocaml.mli +++ b/contrib/extraction/ocaml.mli @@ -8,11 +8,26 @@ (*i $Id$ i*) +(*s Some utility functions to be reused in module [Haskell]. *) + +open Pp +open Miniml +open Names + +val string : string -> std_ppcmds +val open_par : bool -> std_ppcmds +val close_par : bool -> std_ppcmds + +val collect_lambda : ml_ast -> identifier list * ml_ast +val push_vars : identifier list -> identifier list * Idset.t -> + identifier list * (identifier list * Idset.t) + +val current_module : string ref + (*s Production of Ocaml syntax. We export both a functor to be used for extraction in the Coq toplevel and a function to extract some declarations to a file. *) -open Miniml open Mlutil module Make : functor(P : Mlpp_param) -> Mlpp |