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