aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/states.ml
diff options
context:
space:
mode:
authorGravatar ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-03-26 15:07:11 +0000
committerGravatar ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-03-26 15:07:11 +0000
commita7a27c88f2d670d4b20f7dc13e90f6e10600df61 (patch)
tree9fcea94359e84b444ca7343233fe5a5e7906ee8a /library/states.ml
parent89a12a944e4a505dd5bef1d4395c4b7818fc88d3 (diff)
Moved the Loadpath part of Library to its own file, and documented
the interface. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16372 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/states.ml')
-rw-r--r--library/states.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/library/states.ml b/library/states.ml
index 906ebdacc..9d15dfc6c 100644
--- a/library/states.ml
+++ b/library/states.ml
@@ -28,8 +28,8 @@ let (extern_state,intern_state) =
raw_extern s (freeze())),
(fun s ->
let s = ensure_suffix s in
- unfreeze
- (with_magic_number_check (raw_intern (Library.get_load_paths ())) s);
+ let paths = Loadpath.get_paths () in
+ unfreeze (with_magic_number_check (raw_intern paths) s);
Library.overwrite_library_filenames s)
(* Rollback. *)