src/HOLCF/HOLCF.ML

--- a/src/HOLCF/HOLCF.ML	Tue May 24 10:23:24 2005 +0200
+++ b/src/HOLCF/HOLCF.ML	Tue May 24 10:55:11 2005 +0200
@@ -8,7 +8,7 @@
   val thy = the_context ();
 end;
 
-use"adm.ML";
+use "adm_tac.ML";
 
 simpset_ref() := simpset() addSolver
    (mk_solver "adm_tac" (fn thms => (adm_tac (cut_facts_tac thms THEN' cont_tacRs))));