changeset 63182 | b065b4833092 |
parent 63180 | ddfd021884b4 |
child 63183 | 4d04e14d7ab8 |
--- a/src/Pure/Isar/parse_spec.ML Mon May 30 11:44:41 2016 +0200 +++ b/src/Pure/Isar/parse_spec.ML Mon May 30 14:15:44 2016 +0200 @@ -60,7 +60,7 @@ val multi_specs = Parse.enum1 "|" - (opt_thm_name ":" -- Parse.prop -- if_assumes --| + ((opt_thm_name ":" -- Parse.prop -- if_assumes -- Parse.for_fixes >> Scan.triple1) --| Scan.option (Scan.ahead (Parse.name || Parse.$$$ "[") -- Parse.!!! (Parse.$$$ "|"))); val where_multi_specs = Parse.where_ |-- Parse.!!! multi_specs;