From 937ca7a6dbc1a031b7c4540c665b8774440c1bb9 Mon Sep 17 00:00:00 2001 From: herbelin Date: Wed, 22 Nov 2000 21:32:03 +0000 Subject: Abstraction du type 'qualid' pour les noms qualifiés relatifs distinct de 'section_path' pour les noms absolus MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@919 85f007b7-540e-0410-9357-904b9bb8a0f7 --- pretyping/syntax_def.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'pretyping/syntax_def.ml') diff --git a/pretyping/syntax_def.ml b/pretyping/syntax_def.ml index 0038b69d5..f90627f7e 100644 --- a/pretyping/syntax_def.ml +++ b/pretyping/syntax_def.ml @@ -35,7 +35,7 @@ let (in_syntax_constant, out_syntax_constant) = let _ = cache_syntax_constant := fun (sp,c) -> add_syntax_constant sp c; - Nametab.push_obj (basename sp) (sp, in_syntax_constant c) + Nametab.push_object (basename sp) (sp, in_syntax_constant c) let declare_syntactic_definition id c = let _ = add_leaf id CCI (in_syntax_constant c) in () -- cgit v1.2.3