equal
deleted
inserted
replaced
807 Toplevel.keep (Context_Rules.print_rules o Toplevel.context_of))); |
807 Toplevel.keep (Context_Rules.print_rules o Toplevel.context_of))); |
808 |
808 |
809 val _ = |
809 val _ = |
810 Outer_Syntax.improper_command @{command_spec "print_methods"} "print methods of this theory" |
810 Outer_Syntax.improper_command @{command_spec "print_methods"} "print methods of this theory" |
811 (Scan.succeed (Toplevel.unknown_theory o |
811 (Scan.succeed (Toplevel.unknown_theory o |
812 Toplevel.keep (Method.print_methods o Toplevel.theory_of))); |
812 Toplevel.keep (Method.print_methods o Toplevel.context_of))); |
813 |
813 |
814 val _ = |
814 val _ = |
815 Outer_Syntax.improper_command @{command_spec "print_antiquotations"} "print antiquotations" |
815 Outer_Syntax.improper_command @{command_spec "print_antiquotations"} "print antiquotations" |
816 (Scan.succeed (Toplevel.unknown_context o |
816 (Scan.succeed (Toplevel.unknown_context o |
817 Toplevel.keep (Thy_Output.print_antiquotations o Toplevel.context_of))); |
817 Toplevel.keep (Thy_Output.print_antiquotations o Toplevel.context_of))); |