diff options
| author | letouzey | 2009-03-27 16:13:00 +0000 |
|---|---|---|
| committer | letouzey | 2009-03-27 16:13:00 +0000 |
| commit | 999ac2c4c2bb6c7397c88ee1b6f39bdb43eaecb1 (patch) | |
| tree | 4285bc22b1f7c70f5c77434a630ad32cfbc627e1 /toplevel | |
| parent | f6d648569b0486bb49e90b2643577fa0d8434db0 (diff) | |
Remove unused mli files
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12023 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/fhimsg.mli | 74 | ||||
| -rw-r--r-- | toplevel/searchisos.mli | 16 |
2 files changed, 0 insertions, 90 deletions
diff --git a/toplevel/fhimsg.mli b/toplevel/fhimsg.mli deleted file mode 100644 index d29e380573..0000000000 --- a/toplevel/fhimsg.mli +++ /dev/null @@ -1,74 +0,0 @@ -(************************************************************************) -(* v * The Coq Proof Assistant / The Coq Development Team *) -(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *) -(* \VV/ **************************************************************) -(* // * This file is distributed under the terms of the *) -(* * GNU Lesser General Public License Version 2.1 *) -(************************************************************************) - -(*i $Id$ i*) - -(*i*) -open Pp -open Names -open Term -open Sign -open Environ -open Type_errors -(*i*) - -(* This module provides functions to explain the various typing errors. - It is parameterized by a function to pretty-print a term in a given - context. *) - -module type Printer = sig - val pr_term : path_kind -> env -> constr -> std_ppcmds -end - -(*s The result is a module which provides a function [explain_type_error] - to explain a type error for a given kind in a given env, which are - usually the three arguments carried by the exception [TypeError] - (see \refsec{typeerrors}). *) - -module Make (P : Printer) : sig - -val explain_type_error : path_kind -> env -> type_error -> std_ppcmds - -val pr_ne_ctx : std_ppcmds -> path_kind -> env -> std_ppcmds - -val explain_unbound_rel : path_kind -> env -> int -> std_ppcmds - -val explain_not_type : path_kind -> env -> constr -> std_ppcmds - -val explain_bad_assumption : path_kind -> env -> constr -> std_ppcmds - -val explain_reference_variables : identifier -> std_ppcmds - -val explain_elim_arity : - path_kind -> env -> constr -> constr list -> constr - -> unsafe_judgment -> (constr * constr * string) option -> std_ppcmds - -val explain_case_not_inductive : - path_kind -> env -> unsafe_judgment -> std_ppcmds - -val explain_number_branches : - path_kind -> env -> unsafe_judgment -> int -> std_ppcmds - -val explain_ill_formed_branch : - path_kind -> env -> constr -> int -> constr -> constr -> std_ppcmds - -val explain_generalization : - path_kind -> env -> name * types -> constr -> std_ppcmds - -val explain_actual_type : - path_kind -> env -> constr -> constr -> constr -> std_ppcmds - -val explain_ill_formed_rec_body : - path_kind -> env -> guard_error -> - name array -> int -> constr array -> std_ppcmds - -val explain_ill_typed_rec_body : - path_kind -> env -> int -> name list -> unsafe_judgment array - -> types array -> std_ppcmds - -end diff --git a/toplevel/searchisos.mli b/toplevel/searchisos.mli deleted file mode 100644 index b9ad28ad0b..0000000000 --- a/toplevel/searchisos.mli +++ /dev/null @@ -1,16 +0,0 @@ -(************************************************************************) -(* v * The Coq Proof Assistant / The Coq Development Team *) -(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *) -(* \VV/ **************************************************************) -(* // * This file is distributed under the terms of the *) -(* * GNU Lesser General Public License Version 2.1 *) -(************************************************************************) - -(*i $Id$ i*) - -val search_in_lib : bool ref -val type_search : Term.constr -> unit -val require_module2 : bool option -> string -> string option -> bool -> unit -val upd_tbl_ind_one : unit -> unit -val seetime : bool ref -val load_leaf_entry : string -> Names.section_path * Libobject.obj -> unit |
