author | bulwahn |
Thu, 12 Nov 2009 20:38:59 +0100 | |
changeset 33650 | dd3ea99d5c76 |
parent 33649 | 854173fcd21c |
child 33651 | e4aad90618ad |
src/HOL/Tools/Predicate_Compile/predicate_compile_core.ML | file | annotate | diff | comparison | revisions |
--- a/src/HOL/Tools/Predicate_Compile/predicate_compile_core.ML Thu Nov 12 20:38:57 2009 +0100 +++ b/src/HOL/Tools/Predicate_Compile/predicate_compile_core.ML Thu Nov 12 20:38:59 2009 +0100 @@ -1047,7 +1047,6 @@ let val _ = tracing ("Clause " ^ string_of_int (i + 1) ^ " of " ^ p ^ " violates mode " ^ string_of_mode thy p m) - val _ = tracing (string_of_clause thy p (nth rs i)) in () end else ()