Show
Ignore:
Timestamp:
09/20/08 01:05:54 (4 months ago)
Author:
karpet
Message:

yank old wordlist in favor of token_iterator -- TODO still some ref_cnt issues

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • libswish3/trunk/bindings/perl/lib/SWISH/3.pm

    r2151 r2161  
    1919use constant SWISH_DOC_FIELDS => 
    2020    qw( mtime size encoding mime uri nwords ext parser ); 
    21 use constant SWISH_WORD_FIELDS => 
    22     qw( word position metaname context start_offset end_offset ); 
     21use constant SWISH_TOKEN_FIELDS => 
     22    qw( pos meta value context start_byte len ); 
    2323 
    2424# load the XS at runtime, since we need $VERSION 
    …… 
    138138    while ( my $swishword = $wordlist->next ) { 
    139139        print '-' x 50, "\n"; 
    140         for my $w (SWISH_WORD_FIELDS) { 
     140        for my $w (SWISH_TOKEN_FIELDS) { 
    141141            printf( "%15s: %s\n", $w, $swishword->$w ); 
    142142        }