src/HOL/Tools/Lifting/lifting_info.ML
changeset 59936 b8ffc3dc9e24
parent 59582 0fbed69ff081
child 60235 3cab6f891c2f
     1.1 --- a/src/HOL/Tools/Lifting/lifting_info.ML	Mon Apr 06 16:30:44 2015 +0200
     1.2 +++ b/src/HOL/Tools/Lifting/lifting_info.ML	Mon Apr 06 17:06:48 2015 +0200
     1.3 @@ -533,11 +533,11 @@
     1.4  (* outer syntax commands *)
     1.5  
     1.6  val _ =
     1.7 -  Outer_Syntax.command @{command_spec "print_quot_maps"} "print quotient map functions"
     1.8 +  Outer_Syntax.command @{command_keyword print_quot_maps} "print quotient map functions"
     1.9      (Scan.succeed (Toplevel.keep (print_quot_maps o Toplevel.context_of)))
    1.10  
    1.11  val _ =
    1.12 -  Outer_Syntax.command @{command_spec "print_quotients"} "print quotients"
    1.13 +  Outer_Syntax.command @{command_keyword print_quotients} "print quotients"
    1.14      (Scan.succeed (Toplevel.keep (print_quotients o Toplevel.context_of)))
    1.15  
    1.16  end