diff options
| author | coq | 2002-09-24 15:09:43 +0000 |
|---|---|---|
| committer | coq | 2002-09-24 15:09:43 +0000 |
| commit | 146fb70f0729285fb4bb59613c73da0bad92d6c6 (patch) | |
| tree | ff6a4575e885333259828ee39b939114e81ff7db /parsing/coqlib.ml | |
| parent | 99c8c6f52ab04a7680340668a1677fe3e021d364 (diff) | |
Un peu (plus) d'ordre dans Nametab...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3031 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/coqlib.ml')
| -rw-r--r-- | parsing/coqlib.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/coqlib.ml b/parsing/coqlib.ml index 52311d188e..96743098cf 100644 --- a/parsing/coqlib.ml +++ b/parsing/coqlib.ml @@ -47,7 +47,7 @@ let reference dir s = let dir = make_dir ("Coq"::"Init"::[dir]) in let id = id_of_string s in try - Nametab.locate_in_absolute_module dir id + Nametab.absolute_reference (Libnames.make_path dir id) with Not_found -> anomaly ("Coqlib: cannot find "^(string_of_qualid (make_qualid dir id))) |