src/HOL/TPTP/TPTP_Interpret_Test.thy
changeset 82086 e0edf30885ef
parent 72511 460d743010bc
equal deleted inserted replaced
82085:c0f4968fa96e 82086:e0edf30885ef
   131         handle exn => (*FIXME*)
   131         handle exn => (*FIXME*)
   132           if Exn.is_interrupt exn then Exn.reraise exn
   132           if Exn.is_interrupt exn then Exn.reraise exn
   133           else
   133           else
   134             (warning (" test: file " ^ Path.print file ^
   134             (warning (" test: file " ^ Path.print file ^
   135              " raised exception: " ^ Runtime.exn_message exn);
   135              " raised exception: " ^ Runtime.exn_message exn);
   136              {gc = Time.zeroTime, cpu = Time.zeroTime, elapsed = Time.zeroTime})
   136              Timing.zero)
   137       val to_real = Time.toReal
   137       val to_real = Time.toReal
   138       val diff_elapsed =
   138       val diff_elapsed =
   139         #elapsed t2 - #elapsed t1
   139         #elapsed t2 - #elapsed t1
   140         |> to_real
   140         |> to_real
   141       val elapsed = to_real (#elapsed t2)
   141       val elapsed = to_real (#elapsed t2)