Implement new regex escape \N

[p5sagit/p5-mst-13.2.git] / t / op / repeat.t

diff --git a/t/op/repeat.t b/t/op/repeat.t
old mode 100755 (executable)
new mode 100644 (file)
index e728413..d1083e8
--- a/t/op/repeat.t
+++ b/t/op/repeat.t
@@ -6,7 +6,7 @@ BEGIN {
 }
 
 require './test.pl';
-plan(tests => 41);
+plan(tests => 42);
 
 # compile time
 
@@ -151,3 +151,6 @@ is(77, scalar ((1,7)x2),    'stack truncation');
     }
     is($y, 'abcdabcd');
 }
+
+# [perl #35885]
+is( (join ',', (qw(a b c) x 3)), 'a,b,c,a,b,c,a,b,c', 'x on qw produces list' );