Skip to content
Browse files

add a test for RT #83484

  • Loading branch information...
1 parent 8f16996 commit 76296227af2d674b17523268e6e89449cabd9c7a @coke coke committed Mar 29, 2013
Showing with 9 additions and 1 deletion.
  1. +9 −1 S05-substitution/subst.t
View
10 S05-substitution/subst.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 139;
+plan 140;
# L<S05/Substitution/>
@@ -311,6 +311,14 @@ is '12'.subst(/(.)(.)/,{$()*2}),'24', '.. and do nifty things in closures';
is $x, 'AoAoo', 's:2x:nth(1,3) works in combination';
}
+# RT #83484
+# s// with other separators
+{
+ my $x = 'abcde';
+ $x ~~ s!bc!zz!;
+ is $x, 'azzde', '! separator';
+}
+
#L<S05/Substitution/Any scalar assignment operator may be used>
#?rakudo skip 's[...] op= RHS'
#?niecza skip 's[...] op= RHS'

0 comments on commit 7629622

Please sign in to comment.
Something went wrong with that request. Please try again.