diff -r 5873a05b4d21 -r 971a50fda146 src/HOL/Tools/split_rule.ML --- a/src/HOL/Tools/split_rule.ML Sat Feb 03 15:21:57 2001 +0100 +++ b/src/HOL/Tools/split_rule.ML Sat Feb 03 15:22:57 2001 +0100 @@ -128,9 +128,10 @@ (* attribute syntax *) fun split_format x = Attrib.syntax - (Args.mode "complete" >> K (Drule.rule_attribute (K complete_split_rule)) || - Args.and_list1 (Scan.lift (Scan.repeat Args.name)) - >> (fn xss => Drule.rule_attribute (K (split_rule_goal xss)))) x; + (Scan.lift (Args.parens (Args.$$$ "complete")) + >> K (Drule.rule_attribute (K complete_split_rule)) || + Args.and_list1 (Scan.lift (Scan.repeat Args.name)) + >> (fn xss => Drule.rule_attribute (K (split_rule_goal xss)))) x; val setup = [Attrib.add_attributes