Add test for RT #115294

Raku · Oct 7, 2014 · 98ef6a0 · 98ef6a0
1 parent 47f209b
commit 98ef6a0
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/S05-mass/rx.t b/S05-mass/rx.t
@@ -1,6 +1,6 @@
 use Test;
 
-plan 738;
+plan 739;
 
 ### for now
 sub matchcheck(*@) { 1 }
@@ -2090,6 +2090,13 @@ ok '11 12 13 abc' ~~ /:s^[\d+ ]* abc/, '<?ws> before closing bracket';
     is $/.Str, '', '** quantifier with braces (RT #116415)';
 }
 
+# RT #115294
+{
+    $_ = 'foo bar';
+    is m/ "{ $_ }" /, 'foo bar',
+        'using variable in interpolated block in double-quoted string';
+}
+
 # RT #115298
 ok 'foobar' ~~ /$( $_ )/, '$( $_ ) will match literally';
 is $/, 'foobar', '... will match correctly';