src/Tools/induct.ML
changeset 59936 b8ffc3dc9e24
parent 59929 a090551e5ec8
child 59940 087d81f5213e
     1.1 --- a/src/Tools/induct.ML	Mon Apr 06 16:30:44 2015 +0200
     1.2 +++ b/src/Tools/induct.ML	Mon Apr 06 17:06:48 2015 +0200
     1.3 @@ -257,7 +257,7 @@
     1.4    end;
     1.5  
     1.6  val _ =
     1.7 -  Outer_Syntax.command @{command_spec "print_induct_rules"}
     1.8 +  Outer_Syntax.command @{command_keyword print_induct_rules}
     1.9      "print induction and cases rules"
    1.10      (Scan.succeed (Toplevel.unknown_context o
    1.11        Toplevel.keep (print_rules o Toplevel.context_of)));