src/Pure/Thy/read.ML
changeset 207 059e406442fd
parent 204 b9f087b42a44
child 212 b2cdb675ef44
--- a/src/Pure/Thy/read.ML	Thu Dec 30 10:18:23 1993 +0100
+++ b/src/Pure/Thy/read.ML	Thu Dec 30 21:04:53 1993 +0100
@@ -249,7 +249,8 @@
        else
        (
          if thy_uptodate orelse thy_file = "" then ()
-         else (read_thy thyl thy_file;
+         else (writeln ("Reading thy-file \"" ^ thyl ^ ".thy\"");
+               read_thy thyl thy_file;
                use (out_name thyl)
               );