author | wenzelm |
Wed, 12 Jan 2011 15:22:24 +0100 | |
changeset 41523 | 6c7f5d5b7e9a |
parent 41522 | 42d13d00ccfb |
child 41524 | 4d2f9a1c24c7 |
--- a/src/HOL/Nitpick_Examples/Mono_Nits.thy Wed Jan 12 15:15:51 2011 +0100 +++ b/src/HOL/Nitpick_Examples/Mono_Nits.thy Wed Jan 12 15:22:24 2011 +0100 @@ -178,7 +178,7 @@ end handle TimeLimit.TimeOut => "TIMEOUT" | NOT_SUPPORTED _ => "UNSUP" - | exn => if Exn.is_interrupt then reraise exn else "UNKNOWN" + | exn => if Exn.is_interrupt exn then reraise exn else "UNKNOWN" fun check_theory thy = let