Skip to content

Commit 59ce8bb

Browse files
committed
fix lvalue method tests
1 parent 21f9cd3 commit 59ce8bb

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

S12-methods/lvalue.t

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -9,11 +9,11 @@ class T {
99
has $.a;
1010
has $.b;
1111
method l1 is rw {
12-
return $.a;
12+
return-rw $!a;
1313
}
1414

1515
method l2 is rw {
16-
$.b;
16+
$!b;
1717
}
1818
}
1919

@@ -45,9 +45,9 @@ lives_ok { temp $o.l2 = 9; $b = $o.b },
4545
is $o.l2, 4, '... and the value was reset';
4646
#?niecza todo
4747
#?pugs todo
48-
is $o.b, 3, '... also on the attribute';
48+
is $o.b, 4, '... also on the attribute';
4949
#?niecza todo
5050
#?pugs todo
51-
is $a, 9, 'but the temp assignment had worked';
51+
is $b, 9, 'but the temp assignment had worked';
5252

5353
# vim: ft=perl6

0 commit comments

Comments
 (0)