- Timestamp:
- 09/27/08 15:02:20 (2 months ago)
- Files:
-
- 1 modified
-
t/spec/S03-operators/increment.t (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
t/spec/S03-operators/increment.t
r22256 r22433 76 76 is($b, -(++$a), 'est oder of predecrement in -(++$a)'); 77 77 78 #?rakudo skip 'unimpl undef++' 78 79 $a = undef; 79 80 is($a++, 0, 'undef++ == 0'); 80 81 82 #?rakudo skip 'unimpl undef--' 81 83 $a = undef; 82 84 ok($a-- ~~ undef, 'undef-- is undefined'); … … 107 109 108 110 # Test that the expression to increment will only be evaluated once. 111 #?rakudo skip "unimpl Lexically scoped subs" 109 112 { 110 113 my $was_in_foo; … … 118 121 119 122 # Test case courtesy of Limbic_Region 120 121 123 { 122 124 my $curr = 4;
