diff options
author | 2006-01-19 22:34:29 +0000 | |
---|---|---|
committer | 2006-01-19 22:34:29 +0000 | |
commit | 0c0eeea26aafd36301d4b5592225e34153ff955f (patch) | |
tree | 1d839759bc9efc76ab3a0e09a5b52aa3039fffc7 /contrib/extraction/table.mli | |
parent | 46af7a39c66bc711fb32a5ce4fed4ab4f218d6af (diff) | |
parent | 018ee3b0c2be79eb81b1f65c3f3fa142d24129c8 (diff) |
Merge commit 'upstream/8.0pl3'
Diffstat (limited to 'contrib/extraction/table.mli')
-rw-r--r-- | contrib/extraction/table.mli | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/contrib/extraction/table.mli b/contrib/extraction/table.mli index 680638e5..6160452a 100644 --- a/contrib/extraction/table.mli +++ b/contrib/extraction/table.mli @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: table.mli,v 1.25.2.1 2004/07/16 19:30:09 herbelin Exp $ i*) +(*i $Id: table.mli,v 1.25.2.2 2005/11/29 21:40:51 letouzey Exp $ i*) open Names open Libnames @@ -29,7 +29,7 @@ val error_scheme : unit -> 'a val error_not_visible : global_reference -> 'a val error_unqualified_name : string -> string -> 'a val error_MPfile_as_mod : dir_path -> 'a - +val error_record : global_reference -> 'a val check_inside_module : unit -> unit val check_inside_section : unit -> unit @@ -58,9 +58,7 @@ val lookup_ind : kernel_name -> ml_ind val add_recursors : Environ.env -> kernel_name -> unit val is_recursor : global_reference -> bool -val add_record : - kernel_name -> int -> global_reference list * global_reference list -> unit -val find_projections : kernel_name -> global_reference list +val add_projection : int -> kernel_name -> unit val is_projection : global_reference -> bool val projection_arity : global_reference -> int |