diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-26 18:52:04 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-26 18:52:04 +0000 |
| commit | 85b4184369459fff82a11bd2708c10d77f10e9fd (patch) | |
| tree | 45f8bca69d83804504c087955291e2cd69e5843f /pretyping | |
| parent | a0b087a6e16a22b12c8520b81a1526bdda888cd3 (diff) | |
Prise en compte de noms absolus dans la nametab
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@957 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/syntax_def.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/syntax_def.ml b/pretyping/syntax_def.ml index 4801d017e..1e63907a4 100644 --- a/pretyping/syntax_def.ml +++ b/pretyping/syntax_def.ml @@ -36,7 +36,7 @@ let (in_syntax_constant, out_syntax_constant) = let _ = cache_syntax_constant := fun (sp,c) -> add_syntax_constant sp c; - Nametab.push_object (basename sp) (sp, in_syntax_constant c) + Nametab.push_object sp (in_syntax_constant c) let declare_syntactic_definition id c = let _ = add_leaf id CCI (in_syntax_constant c) in () |