[svn:parrot] r45747 - branches/immutable_strings_part1/t/op
bacek at svn.parrot.org
bacek at svn.parrot.org
Sat Apr 17 12:14:49 UTC 2010
Author: bacek
Date: Sat Apr 17 12:14:49 2010
New Revision: 45747
URL: https://trac.parrot.org/parrot/changeset/45747
Log:
Update test for replace op.
Modified:
branches/immutable_strings_part1/t/op/string.t
Modified: branches/immutable_strings_part1/t/op/string.t
==============================================================================
--- branches/immutable_strings_part1/t/op/string.t Sat Apr 17 12:06:56 2010 (r45746)
+++ branches/immutable_strings_part1/t/op/string.t Sat Apr 17 12:14:49 2010 (r45747)
@@ -19,7 +19,7 @@
.sub main :main
.include 'test_more.pir'
- plan(397)
+ plan(398)
set_s_s_sc()
test_clone()
@@ -472,9 +472,10 @@
.sub four_arg_replacement_only_substr
set $S0, "abcdefghijk"
set $S1, "xyz"
- substr $S0, 3, 3, $S1
- is( $S0, "abcxyzghijk", '' )
+ $S2 = replace $S0, 3, 3, $S1
+ is( $S0, "abcdefghijk", '' )
is( $S1, "xyz", '' )
+ is( $S2, "abcxyzghijk", '' )
.end
.sub three_arg_substr
More information about the parrot-commits
mailing list