diff -r 5b58a17c440a -r 1884c40f1539 src/HOL/Library/Reflection.thy --- a/src/HOL/Library/Reflection.thy Sun Oct 18 20:48:24 2015 +0200 +++ b/src/HOL/Library/Reflection.thy Sun Oct 18 21:30:01 2015 +0200 @@ -22,7 +22,7 @@ val onlyN = "only"; val rulesN = "rules"; val any_keyword = keyword onlyN || keyword rulesN; - val thms = Scan.repeat (Scan.unless any_keyword Attrib.multi_thm) >> flat; + val thms = Scan.repeats (Scan.unless any_keyword Attrib.multi_thm); val terms = thms >> map (Thm.term_of o Drule.dest_term); in thms -- Scan.optional (keyword rulesN |-- thms) [] --