Test exception for infix:<xx> with non-numeric Str

RT#130288: https://rt.perl.org/Ticket/Display.html?id=130288
Rakudo fix: rakudo/rakudo@5bacb0573ce9458c2e6

S03-operators/repeat.t

@@ -8,7 +8,7 @@ Repeat operators for strings and lists
 
 =end description
 
-plan 54;
+plan 56;
 
 #L<S03/Changes to Perl 5 operators/"x (which concatenates repetitions of a string to produce a single string">
 
@@ -177,4 +177,12 @@ is ((2, 4, 6).Seq xx *)[^2], ((2, 4, 6), (2, 4, 6)),
     is-deeply 'a' x Int, '', 'type objects get interpreted as 0 iterations';
 }
 
+# RT #130288
+{
+    throws-like ｢rand xx '123aaa'｣, X::Str::Numeric,
+        'Failures in RHS of xx explode (callable LHS)';
+    throws-like ｢42   xx '123aaa'｣, X::Str::Numeric,
+        'Failures in RHS of xx explode (Int LHS)';
+}
+
 # vim: ft=perl6