diff options
| author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-07-20 14:08:34 +0000 |
|---|---|---|
| committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-07-20 14:08:34 +0000 |
| commit | 34d19ef64368a8bac8a32f799b71dc05dd587654 (patch) | |
| tree | bdf482155a8d561207b1a9c780f98ca666b77317 /libguile/regex-posix.c | |
| parent | dd897aafbd218685874256405f740a0e9e1e7303 (diff) | |
| download | guile-34d19ef64368a8bac8a32f799b71dc05dd587654.tar.gz | |
2002-07-20 Han-Wen <hanwen@cs.uu.nl>
* *.c: add space after commas everywhere.
* *.c: use SCM_VECTOR_SET everywhere, where a vector is written.
Document cases where SCM_WRITABLE_VELTS() is used.
* vectors.h (SCM_VELTS): prepare for write barrier, and let
SCM_VELTS() return a const pointer
(SCM_VECTOR_SET): add macro.
* autogen.sh (mscripts): find and check version number of
autoconf. Complain if 2.53 is not found.
Diffstat (limited to 'libguile/regex-posix.c')
| -rw-r--r-- | libguile/regex-posix.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/regex-posix.c b/libguile/regex-posix.c index eb28ebe4b..ddb73ea03 100644 --- a/libguile/regex-posix.c +++ b/libguile/regex-posix.c @@ -247,13 +247,13 @@ SCM_DEFINE (scm_regexp_exec, "regexp-exec", 2, 2, 0, regmatch_t *matches; SCM mvec = SCM_BOOL_F; - SCM_VALIDATE_RGXP (1,rx); + SCM_VALIDATE_RGXP (1, rx); SCM_VALIDATE_STRING (2, str); - SCM_VALIDATE_INUM_DEF_COPY (3,start,0,offset); - SCM_ASSERT_RANGE (3,start, offset >= 0 && offset <= SCM_STRING_LENGTH (str)); + SCM_VALIDATE_INUM_DEF_COPY (3, start,0, offset); + SCM_ASSERT_RANGE (3, start, offset >= 0 && offset <= SCM_STRING_LENGTH (str)); if (SCM_UNBNDP (flags)) flags = SCM_INUM0; - SCM_VALIDATE_INUM (4,flags); + SCM_VALIDATE_INUM (4, flags); /* re_nsub doesn't account for the `subexpression' representing the whole regexp, so add 1 to nmatches. */ |