Changeset 22433 for t

Show
Ignore:
Timestamp:
09/27/08 15:02:20 (2 months ago)
Author:
azawawi
Message:

[t/spec] Fudged increment.t for rakudo

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • t/spec/S03-operators/increment.t

    r22256 r22433  
    7676is($b, -(++$a), 'est oder of predecrement in -(++$a)'); 
    7777 
     78#?rakudo skip 'unimpl undef++' 
    7879$a = undef; 
    7980is($a++, 0, 'undef++ == 0'); 
    8081 
     82#?rakudo skip 'unimpl undef--' 
    8183$a = undef; 
    8284ok($a-- ~~ undef, 'undef-- is undefined'); 
     
    107109 
    108110# Test that the expression to increment will only be evaluated once. 
     111#?rakudo skip "unimpl Lexically scoped subs" 
    109112{ 
    110113  my $was_in_foo; 
     
    118121 
    119122# Test case courtesy of Limbic_Region 
    120  
    121123{ 
    122124    my $curr  = 4;