Test xx not dying with large repetition count

Closes RT#126014.
Raku · Apr 8, 2018 · b320464 · AlexDaniel · Apr 8, 2018 · b320464
1 parent b477bee
commit b320464
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/S03-operators/repeat.t b/S03-operators/repeat.t
@@ -9,7 +9,7 @@ Repeat operators for strings and lists
 
 =end description
 
-plan 62;
+plan 64;
 
 #L<S03/Changes to Perl 5 operators/"x (which concatenates repetitions of a string to produce a single string">
 
@@ -213,4 +213,10 @@ is-deeply (|() xx *)[^5], (Nil, Nil, Nil, Nil, Nil),
     is $z, 25, 'xx does not keep containers around';
 }
 
+# RT #130941
+{
+    lives-ok { 42 xx 9999999999 }, ‘xx is indeed lazy (32-bit range)’;
+    lives-ok { 42 xx (2 ** 62)  }, ‘xx is indeed lazy (64-bit range)’;
+}
+
 # vim: ft=perl6