Changeset 4574 for src/pge

Show
Ignore:
Timestamp:
06/12/05 23:49:04 (4 years ago)
Author:
putter
svk:copy_cache_prev:
6338
Message:

Parse array and hash captures in regexp. Just because they are not implemented doesnt mean we have to parsefail. Untodoed tests.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/pge/PGE/P6Rule.pir

    r4571 r4574  
    5757    $P0 = find_global "PGE::P6Rule", "p6rule_parse_alias" 
    5858    p6meta['$<'] = $P0 
     59    p6meta['@<'] = $P0 
     60    p6meta['%<'] = $P0 
    5961    p6meta['$0'] = $P0 
    6062    p6meta['$1'] = $P0 
    … …  
    409411    inc pos                                        # skip past '$' 
    410412    if token == '$<' goto name                     # $< == named capture 
     413    if token == '@<' goto name                     # @< == named capture 
     414    if token == '%<' goto name                     # %< == named capture 
    411415    $I0 = pos                                      # aha, numeric capture 
    412416    plen = lex["plen"]                             # now let's scan for digits