diff options
author | 2002-09-24 12:57:10 +0000 | |
---|---|---|
committer | 2002-09-24 12:57:10 +0000 | |
commit | 99c8c6f52ab04a7680340668a1677fe3e021d364 (patch) | |
tree | d80e4c75f652afd02afbaa8bd4dc3870c43f6643 /toplevel | |
parent | e870ab98ca09ee2f995fdaaa4e43cd95a9187a18 (diff) |
Nametab data structure reorganisation
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3030 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
-rw-r--r-- | toplevel/vernacentries.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 81e08d667..fb6c930c1 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -231,7 +231,7 @@ let print_located_qualid (_,qid) = msgnl (pr_dirpath dir) with Not_found -> try - let (_,sp) = Nametab.full_name_modtype qid in + let sp = Nametab.full_name_modtype qid in msgnl (pr_sp sp) with Not_found -> msgnl (pr_qualid qid ++ str " is not a defined object") |