247 |
regmatch_t *matches; |
regmatch_t *matches; |
248 |
SCM mvec = SCM_BOOL_F; |
SCM mvec = SCM_BOOL_F; |
249 |
|
|
250 |
SCM_VALIDATE_RGXP (1,rx); |
SCM_VALIDATE_RGXP (1, rx); |
251 |
SCM_VALIDATE_STRING (2, str); |
SCM_VALIDATE_STRING (2, str); |
252 |
SCM_VALIDATE_INUM_DEF_COPY (3,start,0,offset); |
SCM_VALIDATE_INUM_DEF_COPY (3, start,0, offset); |
253 |
SCM_ASSERT_RANGE (3,start, offset >= 0 && offset <= SCM_STRING_LENGTH (str)); |
SCM_ASSERT_RANGE (3, start, offset >= 0 && offset <= SCM_STRING_LENGTH (str)); |
254 |
if (SCM_UNBNDP (flags)) |
if (SCM_UNBNDP (flags)) |
255 |
flags = SCM_INUM0; |
flags = SCM_INUM0; |
256 |
SCM_VALIDATE_INUM (4,flags); |
SCM_VALIDATE_INUM (4, flags); |
257 |
|
|
258 |
/* re_nsub doesn't account for the `subexpression' representing the |
/* re_nsub doesn't account for the `subexpression' representing the |
259 |
whole regexp, so add 1 to nmatches. */ |
whole regexp, so add 1 to nmatches. */ |