diff options
| author | herbelin | 1999-11-24 17:57:25 +0000 |
|---|---|---|
| committer | herbelin | 1999-11-24 17:57:25 +0000 |
| commit | be800056397163ec9c475e6aee44925c97f86f58 (patch) | |
| tree | 373f85ebce6551ce9c3b4f876715fae44f5736b3 /parsing | |
| parent | a67cb75db8dfd77dceefc8c40960b7e99ff6d302 (diff) | |
MAJ pour fusion avec pretyping
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@138 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/astterm.mli | 54 |
1 files changed, 37 insertions, 17 deletions
diff --git a/parsing/astterm.mli b/parsing/astterm.mli index 0f3113bf60..c6fee417b0 100644 --- a/parsing/astterm.mli +++ b/parsing/astterm.mli @@ -1,24 +1,44 @@ +(****************************************************************************) +(* The Calculus of Inductive Constructions *) +(* *) +(* Projet Coq *) +(* *) +(* INRIA LRI-CNRS ENS-CNRS *) +(* Rocquencourt Orsay Lyon *) +(* *) +(* Coq V6.3 *) +(* July 1st 1999 *) +(* *) +(****************************************************************************) +(* astterm.mli *) +(****************************************************************************) -(* $Id$ *) - -(*i*) open Names open Term -open Environ -(*i*) +open Evd +open Rawterm + +(* +val dbize_op : CoqAst.loc -> string -> CoqAst.t list -> constr list -> constr +val dbize : unit assumptions -> CoqAst.t -> constr -val dbize_op : - Coqast.loc -> string -> Coqast.t list -> pseudo_constr list -> pseudo_constr -val dbize : unit assumptions -> Coqast.t -> pseudo_constr +val absolutize_cci : 'c evar_map -> unit assumptions -> constr -> constr +*) +val dbize_cci : 'c evar_map -> unit assumptions -> CoqAst.t -> rawconstr -val absolutize_cci : unsafe_env -> pseudo_constr -> pseudo_constr -val dbize_cci : unsafe_env -> Coqast.t -> pseudo_constr -val absolutize_fw : unsafe_env -> pseudo_constr -> pseudo_constr -val dbize_fw : unsafe_env -> Coqast.t -> pseudo_constr +(* +val absolutize_fw : 'c evar_map -> unit assumptions -> constr -> constr +*) +val dbize_fw : 'c evar_map -> unit assumptions -> CoqAst.t -> rawconstr -val raw_pseudo_constr_of_com : unsafe_env -> Coqast.t -> pseudo_constr -val raw_fpseudo_constr_of_com : unsafe_env -> Coqast.t -> pseudo_constr -val raw_pseudo_constr_of_compattern : unsafe_env -> Coqast.t -> pseudo_constr +val raw_constr_of_com : + 'c evar_map -> 'a assumptions -> CoqAst.t -> rawconstr +val raw_fconstr_of_com : + 'c evar_map -> 'a assumptions -> CoqAst.t -> rawconstr +val raw_constr_of_compattern : + 'c evar_map -> 'a assumptions -> CoqAst.t -> rawconstr -val globalize_command : Coqast.t -> Coqast.t -val globalize_ast : Coqast.t -> Coqast.t +val globalize_command : CoqAst.t -> CoqAst.t +val globalize_ast : CoqAst.t -> CoqAst.t + +(* $Id$ *) |