summaryrefslogtreecommitdiff
path: root/libguile/regex-posix.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-10-09 16:27:24 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-10-09 16:27:24 +0000
commit9fd38a3d142821f117716b90aa6acace79f1b944 (patch)
tree80f4cfd972b60cdbf36013bc5ea04e94e7674418 /libguile/regex-posix.c
parentbfa974f0a4a506888ada92ce362b3eeddde4689b (diff)
downloadguile-9fd38a3d142821f117716b90aa6acace79f1b944.tar.gz
* Made some functions not accept symbols as input parameters any more.
* Replaced some calls to SCM_LENGTH.
Diffstat (limited to 'libguile/regex-posix.c')
-rw-r--r--libguile/regex-posix.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/regex-posix.c b/libguile/regex-posix.c
index bf941c568..d706bd6ba 100644
--- a/libguile/regex-posix.c
+++ b/libguile/regex-posix.c
@@ -232,9 +232,9 @@ SCM_DEFINE (scm_regexp_exec, "regexp-exec", 2, 2, 0,
SCM mvec = SCM_BOOL_F;
SCM_VALIDATE_RGXP (1,rx);
- SCM_VALIDATE_ROSTRING (2,str);
+ SCM_VALIDATE_STRING (2,str);
SCM_VALIDATE_INUM_DEF_COPY (3,start,0,offset);
- SCM_ASSERT_RANGE (3,start,offset >= 0 && (unsigned) offset <= SCM_LENGTH (str));
+ SCM_ASSERT_RANGE (3,start, offset >= 0 && offset <= SCM_STRING_LENGTH (str));
if (SCM_UNBNDP (flags))
flags = SCM_INUM0;
SCM_VALIDATE_INUM (4,flags);