aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorherbelin2008-06-11 20:14:12 +0000
committerherbelin2008-06-11 20:14:12 +0000
commit91d8c7eda69c2e97d73dbc2922f3ba92b03a2b2f (patch)
tree71ae9f3d91c31d4912bbeb6c1266c13f869197fb
parent07b85674ef5f90467ea9bd8ed3c87572d2af8016 (diff)
Bug dans l'adaptation de library_full_filename lors du débranchement
des filename hors reset (r11077). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11110 85f007b7-540e-0410-9357-904b9bb8a0f7
-rw-r--r--library/library.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/library/library.ml b/library/library.ml
index e595df092c..da7c4ebb04 100644
--- a/library/library.ml
+++ b/library/library.ml
@@ -197,8 +197,7 @@ let register_library_filename dir f =
LibraryFilenameMap.add dir f !libraries_filename_table
let library_full_filename dir =
- try LibraryFilenameMap.find dir !libraries_filename_table
- with Not_found -> "unavailable"
+ LibraryFilenameMap.find dir !libraries_filename_table
let library_is_loaded dir =
try let _ = find_library dir in true