src/HOL/Tools/Function/function.ML
changeset 59936 b8ffc3dc9e24
parent 59859 f9d1442c70f3
child 60499 54a3db2ed201
     1.1 --- a/src/HOL/Tools/Function/function.ML	Mon Apr 06 16:30:44 2015 +0200
     1.2 +++ b/src/HOL/Tools/Function/function.ML	Mon Apr 06 17:06:48 2015 +0200
     1.3 @@ -286,13 +286,13 @@
     1.4  (* outer syntax *)
     1.5  
     1.6  val _ =
     1.7 -  Outer_Syntax.local_theory_to_proof' @{command_spec "function"}
     1.8 +  Outer_Syntax.local_theory_to_proof' @{command_keyword function}
     1.9      "define general recursive functions"
    1.10      (function_parser default_config
    1.11        >> (fn ((config, fixes), statements) => function_cmd fixes statements config))
    1.12  
    1.13  val _ =
    1.14 -  Outer_Syntax.local_theory_to_proof @{command_spec "termination"}
    1.15 +  Outer_Syntax.local_theory_to_proof @{command_keyword termination}
    1.16      "prove termination of a recursive function"
    1.17      (Scan.option Parse.term >> termination_cmd)
    1.18