Changeset 22482 for src/perl6

Show
Ignore:
Timestamp:
10/02/08 02:31:31 (2 months ago)
Author:
lwall
Message:

[Cursor] fix macro bug induced by implicit {*} reductions

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/perl6/Cursor.pmc

    r22475 r22482  
    10181018    \$C->{'sym'} = \$sym; 
    10191019 
    1020     \$self->_MATCHIFY( Cursor::lazymap sub { STD::$coercion->coerce(\$_[0]) }, 
     1020    \$self->_MATCHIFY( '$name', Cursor::lazymap sub { STD::$coercion->coerce(\$_[0]) }, 
    10211021        \$C->_SYM(\$sym, 0) 
    10221022    ); 
    … …  
    13831383    $$self{_}[$startpos]{ws} = undef;   # exists means we know, undef means no ws  before here 
    13841384 
    1385     $self->_MATCHIFY( 
     1385    $self->_MATCHIFY( 'ws', 
    13861386        $C->_BRACKET( sub { my $C=shift; 
    13871387            do { my @gather;