Lines Matching refs:len
65 #define EXC4(a,b) ( len==4 && EXCBASE(b) )
66 #define EXC5(a,b) ( len==5 && EXCBASE(b) )
67 #define EXC6(a,b) ( len==6 && EXCBASE(b) && a[4]==b[4] )
68 #define EXC7(a,b) ( len==7 && EXCBASE(b) && a[4]==b[4] && a[5]==b[5] )
69 #define EXC8(a,b) ( len==8 && EXCBASE(b) && a[4]==b[4] && a[5]==b[5] && a[6]==b[6] )
71 void stem_en ( unsigned char * word, int len ) in stem_en() argument
76 if ( len<=2 ) in stem_en()
86 if ( len==3 ) in stem_en()
108 if ( len>=4 && len<=8 ) in stem_en()
111 if ( len==4 ) in stem_en()
125 switch ( word[len-1] ) in stem_en()
179 for ( i=1; i<len; i++ ) in stem_en()
186 if ( len>=5 && EXCBASE("gene") && word[4]=='r' ) in stem_en()
192 else if ( len>=6 && EXCBASE("comm") && word[4]=='u' && word[5]=='n' ) in stem_en()
196 } else if ( len>=5 && EXCBASE("arse") && word[4]=='n' ) in stem_en()
204 for ( i=0; i<len && !is_vowel(i); i++ ); in stem_en()
207 for ( i=first_vowel; i<len-2; i++ ) in stem_en()
212 for ( i=r1; i<len-2; i++ ) in stem_en()
217 #define W(p,c) ( word[len-p]==c ) in stem_en()
219 #define SUFF2(c2,c1) ( len>=2 && W(1,c1) && W(2,c2) ) in stem_en()
220 #define SUFF3(c3,c2,c1) ( len>=3 && W(1,c1) && W(2,c2) && W(3,c3) ) in stem_en()
221 #define SUFF4(c4,c3,c2,c1) ( len>=4 && W(1,c1) && W(2,c2) && W(3,c3) && W(4,c4) ) in stem_en()
222 #define SUFF5(c5,c4,c3,c2,c1) ( len>=5 && W(1,c1) && W(2,c2) && W(3,c3) && W(4,c4) && W(5,c5) ) in stem_en()
223 #define SUFF6(c6,c5,c4,c3,c2,c1) ( len>=6 && W(1,c1) && W(2,c2) && W(3,c3) && W(4,c4) && W(5,c5) &&… in stem_en()
224 #define SUFF7(c7,c6,c5,c4,c3,c2,c1) ( len>=7 && W(1,c1) && W(2,c2) && W(3,c3) && W(4,c4) && W(5,c5)… in stem_en()
226 #define SUFF3A(c3,c2) ( len>=3 && W(2,c2) && W(3,c3) ) in stem_en()
227 #define SUFF4A(c4,c3,c2) ( len>=4 && W(2,c2) && W(3,c3) && W(4,c4) ) in stem_en()
228 #define SUFF5A(c5,c4,c3,c2) ( len>=5 && W(2,c2) && W(3,c3) && W(4,c4) && W(5,c5) ) in stem_en()
229 #define SUFF6A(c6,c5,c4,c3,c2) ( len>=6 && W(2,c2) && W(3,c3) && W(4,c4) && W(5,c5) && W(6,c6) ) in stem_en()
230 #define SUFF7A(c7,c6,c5,c4,c3,c2) ( len>=6 && W(2,c2) && W(3,c3) && W(4,c4) && W(5,c5) && W(6,c6) &… in stem_en()
237 #define IED_ACTION { if ( len-->4 ) len--; } in stem_en()
239 #define IED_ACTION { if ( len--!=4 ) len--; } in stem_en()
242 switch ( word[len-1] ) in stem_en()
245 if ( word[len-3]=='i' && word[len-2]=='e' ) in stem_en()
250 len -= 2; in stem_en()
251 else if ( word[len-3]=='i' && word[len-2]=='e' ) in stem_en()
253 else if ( word[len-2]!='u' && word[len-2]!='s' ) in stem_en()
256 if ( first_vowel<=len-3 ) in stem_en()
259 len--; in stem_en()
269 switch ( word[len-1] ) in stem_en()
272 if ( SUFF3A ( 'e', 'e' ) ) { if ( len-3>=r1 ) len--; break; } in stem_en()
273 if ( word[len-2]=='e' ) i = 2; in stem_en()
277 if ( word[len-2]=='l' ) in stem_en()
279 if ( SUFF5A ( 'e', 'e', 'd', 'l' ) ) { if ( len-5>=r1 ) len -= 3; break; } in stem_en()
290 if ( i && first_vowel<len-i ) in stem_en()
292 len -= i; in stem_en()
294 word[len++] = 'e'; in stem_en()
295 else if ( len>=2 && word[len-1]==word[len-2] && stem_en_id ( word[len-1] ) ) in stem_en()
296 len--; in stem_en()
297 else if ( ( len==2 && is_vowel(0) && !is_vowel(1) ) in stem_en()
298 || ( len==r1 && !is_vowel ( len-3 ) && is_vowel ( len-2 ) && !stem_en_ivwxy ( word[len-1] ) ) ) in stem_en()
300 word[len++] = 'e'; in stem_en()
308 if ( len>2 in stem_en()
309 && ( word[len-1]=='y' || word[len-1]=='Y' ) in stem_en()
310 && !is_vowel ( len-2 ) ) in stem_en()
312 word[len-1] = 'i'; in stem_en()
319 if ( len-2>=r1 ) in stem_en()
320 switch ( word[len-1] ) in stem_en()
323 if ( len>=3 && ( W ( 2, 'c' ) || W ( 2, 'l' ) || W ( 2, 't' ) ) ) in stem_en()
325 if ( SUFF4A ( 'e', 'n', 'c' ) ) { if ( len-4>=r1 ) word[len-1] = 'e'; break; } in stem_en()
326 if ( SUFF4A ( 'a', 'n', 'c' ) ) { if ( len-4>=r1 ) word[len-1] = 'e'; break; } in stem_en()
327 if ( SUFF4A ( 'a', 'b', 'l' ) ) { if ( len-4>=r1 ) word[len-1] = 'e'; break; } in stem_en()
328 if ( SUFF3A ( 'b', 'l' ) ) { if ( len-3>=r1 ) word[len-1] = 'e'; break; } in stem_en()
330 if ( SUFF5A ( 'e', 'n', 't', 'l' ) ) { if ( len-5>=r1 ) len -= 2; break; } in stem_en()
331 if ( SUFF5A ( 'a', 'l', 'i', 't' ) ) { if ( len-5>=r1 ) len -= 3; break; } in stem_en()
332 if ( SUFF5A ( 'o', 'u', 's', 'l' ) ) { if ( len-5>=r1 ) len -= 2; break; } in stem_en()
334 … if ( SUFF5A ( 'i', 'v', 'i', 't' ) ) { if ( len-5>=r1 ) { word[len-3] = 'e'; len -= 2; } break; } in stem_en()
335 …if ( SUFF6A ( 'b', 'i', 'l', 'i', 't' ) ) { if ( len-6>=r1 ) { word[len-5] = 'l'; word[len-4] = 'e… in stem_en()
336 if ( SUFF5A ( 'f', 'u', 'l', 'l' ) ) { if ( len-5>=r1 ) len -= 2; break; } in stem_en()
337 if ( SUFF6A ( 'l', 'e', 's', 's', 'l' ) ) { if ( len-6>=r1 ) len -= 2; break; } in stem_en()
341 if ( len-3>=r1 && SUFF3A ( 'o', 'g' ) && word[len-4]=='l' ) { len -= 1; break; } in stem_en()
343 if ( len-3>=r1 && SUFF3A ( 'o', 'g' ) ) { len -= 1; break; } in stem_en()
346 if ( len-2>=r1 && word[len-2]=='l' ) in stem_en()
347 len -= 2; in stem_en()
351 if ( len-2>=r1 && SUFF2 ( 'a', 'l' ) ) in stem_en()
353 len -= 2; in stem_en()
354 if ( len-5>=r1 && SUFF5 ( 'a', 't', 'i', 'o', 'n' ) ) in stem_en()
356 len -= 3; in stem_en()
357 word[len++] = 'e'; in stem_en()
362 len += 2; in stem_en()
365 switch ( word[len-1] ) in stem_en()
380 len += 2; in stem_en()
387 …if ( SUFF7A ( 'a', 't', 'i', 'o', 'n', 'a' ) ) { if ( len-7>=r1 ) { word[len-5] = 'e'; len -= 4; }… in stem_en()
388 if ( SUFF6A ( 't', 'i', 'o', 'n', 'a' ) ) { if ( len-6>=r1 ) len -= 2; break; } in stem_en()
392 if ( SUFF5A ( 'a', 'l', 'i', 's' ) ) { if ( len-5>=r1 ) len -= 3; break; } in stem_en()
396 …if ( SUFF7A ( 'i', 'z', 'a', 't', 'i', 'o' ) ) { if ( len-7>=r1 ) { word[len-5] = 'e'; len -= 4; }… in stem_en()
397 …if ( SUFF5A ( 'a', 't', 'i', 'o' ) ) { if ( len-5>=r1 ) { word[len-3] = 'e'; len -= 2; } break; } in stem_en()
401 if ( SUFF4A ( 'i', 'z', 'e' ) ) { if ( len-4>=r1 ) len -= 1; break; } in stem_en()
402 if ( SUFF4A ( 'a', 't', 'o' ) ) { if ( len-4>=r1 ) { word[len-2] = 'e'; len -= 1; } break; } in stem_en()
406 if ( len-7>=r1 && ( in stem_en()
411 len -= 4; in stem_en()
420 if ( len-3>=r1 ) in stem_en()
421 switch ( word[len-1] ) in stem_en()
424 if ( SUFF5A ( 'a', 'l', 'i', 'z' ) ) { if ( len-5>=r1 ) len -= 3; break; } in stem_en()
425 if ( SUFF5A ( 'i', 'c', 'a', 't' ) ) { if ( len-5>=r1 ) len -= 3; break; } in stem_en()
427 if ( SUFF5A ( 'a', 't', 'i', 'v' ) ) { if ( len-5>=r2 ) len -= 5; break; } in stem_en()
429 if ( SUFF5A ( 'a', 't', 'i', 'v' ) ) { if ( len-5>=r1 ) len -= 5; break; } in stem_en()
434 if ( SUFF5A ( 'i', 'c', 'i', 't' ) ) { if ( len-5>=r1 ) len -= 3; break; } in stem_en()
438 if ( SUFF4A ( 'i', 'c', 'a' ) ) { if ( len-4>=r1 ) len -= 2; break; } in stem_en()
439 if ( SUFF3A ( 'f', 'u' ) ) { len -= 3; break; } in stem_en()
443 if ( SUFF4A ( 'n', 'e', 's' ) ) { if ( len-4>=r1 ) len -= 4; break; } in stem_en()
451 if ( len-2>=r2 ) in stem_en()
452 switch ( word[len-1] ) in stem_en()
455 if ( word[len-2]=='i' ) len -= 2; // -ic in stem_en()
459 if ( len-3>=r2 ) in stem_en()
461 if ( SUFF4A ( 'a', 'n', 'c' ) ) { if ( len-4>=r2 ) len -= 4; break; } in stem_en()
462 if ( SUFF4A ( 'e', 'n', 'c' ) ) { if ( len-4>=r2 ) len -= 4; break; } in stem_en()
463 if ( SUFF4A ( 'a', 'b', 'l' ) ) { if ( len-4>=r2 ) len -= 4; break; } in stem_en()
464 if ( SUFF4A ( 'i', 'b', 'l' ) ) { if ( len-4>=r2 ) len -= 4; break; } in stem_en()
465 if ( SUFF3A ( 'a', 't' ) ) { len -= 3; break; } in stem_en()
466 if ( SUFF3A ( 'i', 'v' ) ) { len -= 3; break; } in stem_en()
467 if ( SUFF3A ( 'i', 'z' ) ) { len -= 3; break; } in stem_en()
472 if ( SUFF3A ( 'i', 't' ) ) { if ( len-3>=r2 ) len -= 3; break; } in stem_en()
476 if ( word[len-2]=='a' ) len -= 2; // -al in stem_en()
480 if ( SUFF3A ( 'i', 's' ) ) { if ( len-3>=r2 ) len -= 3; break; } in stem_en()
484 if ( len-3>=r2 && SUFF3 ( 'i', 'o', 'n' ) && ( word[len-4]=='t' || word[len-4]=='s' ) ) in stem_en()
485 len -= 3; in stem_en()
489 if ( word[len-2]=='e' ) len -= 2; // -er in stem_en()
493 if ( SUFF3A ( 'o', 'u' ) ) { if ( len-3>=r2 ) len -= 3; break; } in stem_en()
497 if ( word[len-2]=='n' ) in stem_en()
499 if ( SUFF5A ( 'e', 'm', 'e', 'n' ) ) { if ( len-5>=r2 ) len -= 5; break; } in stem_en()
500 if ( SUFF4A ( 'm', 'e', 'n' ) ) { if ( len-4>=r2 ) len -= 4; break; } in stem_en()
501 if ( SUFF3A ( 'a', 'n' ) ) { if ( len-3>=r2 ) len -= 3; break; } in stem_en()
502 if ( SUFF3A ( 'e', 'n' ) ) { if ( len-3>=r2 ) len -= 3; break; } in stem_en()
512 if ( len>r2 && word[len-1]=='l' && word[len-2]=='l' ) in stem_en()
513 len--; in stem_en()
516 while ( word[len-1]=='e' ) in stem_en()
518 if ( len>r2 ) in stem_en()
520 len--; in stem_en()
523 if ( len<=r1 ) in stem_en()
525 if ( len>3 && !is_vowel ( len-4 ) && is_vowel ( len-3 ) && !stem_en_ivwxy ( word[len-2] ) ) in stem_en()
527 if ( len==3 && is_vowel(0) && !is_vowel(1) ) in stem_en()
529 len--; in stem_en()
533 if ( len>r2 && word[len-1]=='l' && word[len-2]=='l' ) in stem_en()
534 len--; in stem_en()
541 word[len] = 0; in stem_en()
543 for ( i=0; i<len; i++ ) in stem_en()