From 3ef7797ef6fc605dfafb32523261fe1b023aeecb Mon Sep 17 00:00:00 2001 From: Samuel Mimram Date: Fri, 28 Apr 2006 14:59:16 +0000 Subject: Imported Upstream version 8.0pl3+8.1alpha --- interp/syntax_def.mli | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'interp/syntax_def.mli') diff --git a/interp/syntax_def.mli b/interp/syntax_def.mli index 0aec03c2..ac7318b5 100644 --- a/interp/syntax_def.mli +++ b/interp/syntax_def.mli @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: syntax_def.mli,v 1.3.2.2 2004/07/16 19:30:23 herbelin Exp $ i*) +(*i $Id: syntax_def.mli 7051 2005-05-20 15:45:51Z herbelin $ i*) (*i*) open Util @@ -23,3 +23,10 @@ val declare_syntactic_definition : bool -> identifier -> bool -> aconstr val search_syntactic_definition : loc -> kernel_name -> rawconstr +(* [locate_global] locates global reference possibly following a chain of + syntactic aliases; raise Not_found if not bound in the global env; + raise an error if bound to a syntactic def that does not denote a + reference *) + +val locate_global : Libnames.qualid -> Libnames.global_reference + -- cgit v1.2.3