changeset 56025 | d74fed45fa8b |
parent 55997 | 9dc5ce83202c |
child 56052 | 4873054cd1fc |
--- a/src/HOL/Tools/inductive.ML Mon Mar 10 10:13:47 2014 +0100 +++ b/src/HOL/Tools/inductive.ML Mon Mar 10 13:55:03 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.extern_table' ctxt space infos))), Pretty.big_list "monotonicity rules:" (map (Display.pretty_thm_item ctxt) monos)] end |> Pretty.chunks |> Pretty.writeln;