changeset 56052 | 4873054cd1fc |
parent 56025 | d74fed45fa8b |
child 56245 | 84fc7dfa3cd4 |
--- a/src/HOL/Tools/inductive.ML Tue Mar 11 13:58:22 2014 +0100 +++ b/src/HOL/Tools/inductive.ML Tue Mar 11 14:28:39 2014 +0100 @@ -230,7 +230,7 @@ [Pretty.block (Pretty.breaks (Pretty.str "(co)inductives:" :: - map (Pretty.mark_str o #1) (Name_Space.extern_table' ctxt space infos))), + map (Pretty.mark_str o #1) (Name_Space.markup_entries ctxt space (Symtab.dest infos)))), Pretty.big_list "monotonicity rules:" (map (Display.pretty_thm_item ctxt) monos)] end |> Pretty.chunks |> Pretty.writeln;