equal
deleted
inserted
replaced
112 if auto_time_limit > 0.0 then |
112 if auto_time_limit > 0.0 then |
113 (case TimeLimit.timeLimit (seconds auto_time_limit) (fn () => tool true state) () of |
113 (case TimeLimit.timeLimit (seconds auto_time_limit) (fn () => tool true state) () of |
114 (true, (_, outcome)) => List.app Output.information outcome |
114 (true, (_, outcome)) => List.app Output.information outcome |
115 | _ => ()) |
115 | _ => ()) |
116 else () |
116 else () |
117 end handle exn => if Exn.is_interrupt exn then reraise exn else ()} |
117 end handle exn => if Exn.is_interrupt exn then Exn.reraise exn else ()} |
118 else NONE) |
118 else NONE) |
119 |
119 |
120 |
120 |
121 (* hybrid tool setup *) |
121 (* hybrid tool setup *) |
122 |
122 |