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 /contrib/interface | |
| 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 'contrib/interface')
| -rw-r--r-- | contrib/interface/pbp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/interface/pbp.ml b/contrib/interface/pbp.ml index 55aae90be2..7bd29a9584 100644 --- a/contrib/interface/pbp.ml +++ b/contrib/interface/pbp.ml @@ -249,7 +249,7 @@ let reference dir s = (List.map id_of_string (List.rev ("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 "^ (Libnames.string_of_qualid (Libnames.make_qualid dir id))) |