# HG changeset patch
# User wenzelm
# Date 1294842144 -3600
# Node ID 6c7f5d5b7e9acb606d6d29910488da472a2780ee
# Parent  42d13d00ccfb248fc771c2ea9f03041888897e91
compile;

diff -r 42d13d00ccfb -r 6c7f5d5b7e9a src/HOL/Nitpick_Examples/Mono_Nits.thy
--- 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