src/HOL/Tools/BNF/bnf_lfp_rec_sugar.ML
changeset 59936 b8ffc3dc9e24
parent 59859 f9d1442c70f3
child 60003 ba8fa0c38d66
     1.1 --- a/src/HOL/Tools/BNF/bnf_lfp_rec_sugar.ML	Mon Apr 06 16:30:44 2015 +0200
     1.2 +++ b/src/HOL/Tools/BNF/bnf_lfp_rec_sugar.ML	Mon Apr 06 17:06:48 2015 +0200
     1.3 @@ -669,7 +669,7 @@
     1.4     || Parse.reserved "nonexhaustive" >> K Nonexhaustive_Option
     1.5     || Parse.reserved "transfer" >> K Transfer_Option);
     1.6  
     1.7 -val _ = Outer_Syntax.local_theory @{command_spec "primrec"}
     1.8 +val _ = Outer_Syntax.local_theory @{command_keyword primrec}
     1.9    "define primitive recursive functions"
    1.10    ((Scan.optional (@{keyword "("} |-- Parse.!!! (Parse.list1 rec_option_parser)
    1.11        --| @{keyword ")"}) []) --