- Timestamp:
- 11/09/08 21:56:19 (2 months ago)
- Files:
-
- 1 modified
-
t/spec/S04-declarations/my.t (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
t/spec/S04-declarations/my.t
r22941 r22944 20 20 } 21 21 22 #?rakudo todo 'scoping bug'23 22 { 24 23 my $ret = 42; 25 lives_ok { $ret = my($x) ~ $x }, 'my() variable is visible (1)'; 26 #?rakudo skip 'test dependency' 24 lives_ok { $ret = (my $x) ~ $x }, 'my() variable is visible (1)'; 27 25 is $ret, "", 'my() variable is visible (2)'; 28 26 }
