export cond_with_path;

--- a/src/Pure/Thy/thy_load.ML	Wed Oct 27 17:09:05 1999 +0200
+++ b/src/Pure/Thy/thy_load.ML	Wed Oct 27 17:09:31 1999 +0200
@@ -17,6 +17,7 @@
 signature THY_LOAD =
 sig
   include BASIC_THY_LOAD
+  val cond_with_path: Path.T -> ('a -> 'b) -> 'a -> 'b
   val ml_path: string -> Path.T
   val thy_path: string -> Path.T
   val check_file: Path.T -> (Path.T * File.info) option