src/HOL/Library/Reflection.thy
changeset 61476 1884c40f1539
parent 60500 903bb1495239
child 69605 a96320074298
--- 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) [] --