changeset 61268 | abe08fb15a12 |
parent 59582 | 0fbed69ff081 |
child 62958 | b41c1cb5e251 |
--- a/src/HOL/Tools/Predicate_Compile/predicate_compile_data.ML Fri Sep 25 20:04:25 2015 +0200 +++ b/src/HOL/Tools/Predicate_Compile/predicate_compile_data.ML Fri Sep 25 20:37:59 2015 +0200 @@ -217,7 +217,7 @@ val _ = if show_intermediate_results options then tracing ("Specification for " ^ (Syntax.string_of_term_global thy t) ^ ":\n" ^ - commas (map (Display.string_of_thm_global thy) spec)) + commas (map (Thm.string_of_thm_global thy) spec)) else () in spec