The R Project SVN R

Rev

Rev 49607 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 49607 Rev 57571
Line 62... Line 62...
62
		    next_c = 0;						      \
62
		    next_c = 0;						      \
63
		    str_byte++;						      \
63
		    str_byte++;						      \
64
		  }							      \
64
		  }							      \
65
		else							      \
65
		else							      \
66
		  {							      \
66
		  {							      \
67
		    pos_add_next = w;					      \
67
		    pos_add_next = (unsigned int)w;					      \
68
		    str_byte += w;					      \
68
		    str_byte += w;					      \
69
		  }							      \
69
		  }							      \
70
	      }								      \
70
	      }								      \
71
	  }								      \
71
	  }								      \
72
      }									      \
72
      }									      \
Line 159... Line 159...
159
	   || IS_WORD_CHAR(prev_c) != IS_WORD_CHAR(next_c))))
159
	   || IS_WORD_CHAR(prev_c) != IS_WORD_CHAR(next_c))))
160
 
160
 
161
#define CHECK_CHAR_CLASSES(trans_i, tnfa, eflags)                             \
161
#define CHECK_CHAR_CLASSES(trans_i, tnfa, eflags)                             \
162
  (((trans_i->assertions & ASSERT_CHAR_CLASS)                                 \
162
  (((trans_i->assertions & ASSERT_CHAR_CLASS)                                 \
163
       && !(tnfa->cflags & REG_ICASE)                                         \
163
       && !(tnfa->cflags & REG_ICASE)                                         \
164
       && !tre_isctype((tre_cint_t)prev_c, trans_i->u.class))                 \
164
       && !tre_isctype((tre_cint_t)prev_c, trans_i->u.classt))                \
165
    || ((trans_i->assertions & ASSERT_CHAR_CLASS)                             \
165
    || ((trans_i->assertions & ASSERT_CHAR_CLASS)                             \
166
        && (tnfa->cflags & REG_ICASE)                                         \
166
        && (tnfa->cflags & REG_ICASE)                                         \
167
        && !tre_isctype(tre_tolower((tre_cint_t)prev_c),trans_i->u.class)     \
167
        && !tre_isctype(tre_tolower((tre_cint_t)prev_c),trans_i->u.classt)    \
168
	&& !tre_isctype(tre_toupper((tre_cint_t)prev_c),trans_i->u.class))    \
168
	&& !tre_isctype(tre_toupper((tre_cint_t)prev_c),trans_i->u.classt))       \
169
    || ((trans_i->assertions & ASSERT_CHAR_CLASS_NEG)                         \
169
    || ((trans_i->assertions & ASSERT_CHAR_CLASS_NEG)                         \
170
        && tre_neg_char_classes_match(trans_i->neg_classes,(tre_cint_t)prev_c,\
170
        && tre_neg_char_classes_match(trans_i->neg_classes,(tre_cint_t)prev_c,\
171
                                      tnfa->cflags & REG_ICASE)))
171
                                      tnfa->cflags & REG_ICASE)))
172
 
172
 
173
 
173