Changeset 2164
- Timestamp:
- 09/20/08 19:47:52 (4 months ago)
- Files:
-
- libswish3/trunk/bindings/perl/3.xs (modified) (6 diffs)
- libswish3/trunk/bindings/perl/XS/Token.xs (modified) (1 diff)
- libswish3/trunk/bindings/perl/xs_helpers.c (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
libswish3/trunk/bindings/perl/3.xs
r2161 r2164 371 371 char* CLASS; 372 372 swish_TokenIterator* ti; 373 swish_TokenList* tl;374 373 swish_MetaName* metaname; 375 374 xmlChar* meta; … … 379 378 CODE: 380 379 CLASS = TOKENITERATOR_CLASS; 381 tl = swish_init_token_list(); 382 ti = swish_init_token_iterator(self->config, tl); 380 ti = swish_init_token_iterator(self); 383 381 ti->ref_cnt++; 384 382 meta = (xmlChar*)SWISH_DEFAULT_METANAME; … … 411 409 metaname->ref_cnt++; 412 410 413 sp_tokenize3( self, buf, tl, metaname, context );411 sp_tokenize3( ti, buf, metaname, context ); 414 412 415 413 RETVAL = ti; … … 430 428 char* CLASS; 431 429 swish_TokenIterator* ti; 432 swish_TokenList* tl;433 430 swish_MetaName* metaname; 434 431 xmlChar* meta; … … 438 435 CODE: 439 436 CLASS = TOKENITERATOR_CLASS; 440 tl = swish_init_token_list(); 441 ti = swish_init_token_iterator(self->config, tl); 437 ti = swish_init_token_iterator(self); 442 438 ti->ref_cnt++; 443 439 meta = (xmlChar*)SWISH_DEFAULT_METANAME; … … 469 465 metaname->ref_cnt++; 470 466 471 swish_tokenize3( self, buf, tl, metaname, context );467 swish_tokenize3( ti, buf, metaname, context ); 472 468 473 469 RETVAL = ti; libswish3/trunk/bindings/perl/XS/Token.xs
r2161 r2164 12 12 CODE: 13 13 value = swish_get_token_value(self); 14 RETVAL = newSVpvn( (char*)value, s trlen((char*)value));14 RETVAL = newSVpvn( (char*)value, self->len ); 15 15 16 16 OUTPUT: libswish3/trunk/bindings/perl/xs_helpers.c
r2161 r2164 36 36 static void sp_test_handler( swish_ParserData* parse_data ); 37 37 static void sp_handler( swish_ParserData* parse_data ); 38 static int sp_tokenize3( swish_ 3 *s3,38 static int sp_tokenize3( swish_TokenIterator *ti, 39 39 xmlChar *buf, 40 swish_TokenList * tl,41 40 swish_MetaName *meta, 42 41 xmlChar *context ); … … 632 631 static int 633 632 sp_tokenize3( 634 swish_ 3 *s3,633 swish_TokenIterator *ti, 635 634 xmlChar *buf, 636 swish_TokenList *tl,637 635 swish_MetaName *meta, 638 636 xmlChar *context … … 648 646 xmlChar *str_start; 649 647 int str_len; 648 int minwordlen, maxwordlen; 650 649 xmlChar *str_end; 651 650 SV *token_re; … … 659 658 str_len = strlen((char*)buf); 660 659 str_end = str_start + str_len; 661 token_re = s3->analyzer->regex; 660 token_re = ti->s3->analyzer->regex; 661 minwordlen = ti->s3->analyzer->minwordlen; 662 maxwordlen = ti->s3->analyzer->maxwordlen; 662 663 663 664 … … 703 704 704 705 token_len = (end_ptr - start_ptr) + 1; 705 swish_add_token(tl, start_ptr, token_len, meta, context); 706 707 if (token_len < minwordlen) 708 continue; 709 710 if (token_len > maxwordlen) 711 continue; 712 713 swish_add_token(ti->tl, start_ptr, token_len, meta, context); 706 714 num_tokens++; 707 715
