Logging of theorem names to the /tmp directory now works
authorpaulson
Thu Oct 12 15:48:13 2006 +0200 (2006-10-12)
changeset 2099551c41f167adc
parent 20994 6f2995b4c867
child 20996 197e6875d637
Logging of theorem names to the /tmp directory now works
src/HOL/Tools/res_atp.ML
     1.1 --- a/src/HOL/Tools/res_atp.ML	Thu Oct 12 15:00:07 2006 +0200
     1.2 +++ b/src/HOL/Tools/res_atp.ML	Thu Oct 12 15:48:13 2006 +0200
     1.3 @@ -756,7 +756,7 @@
     1.4    end
     1.5    
     1.6  fun trace_array fname =
     1.7 -  let val path = File.tmp_path (Path.basic fname)
     1.8 +  let val path = File.unpack_platform_path fname
     1.9    in  Array.app (File.append path o (fn s => s ^ "\n"))  end;
    1.10  
    1.11  (*Converting a subgoal into negated conjecture clauses*)