summaryrefslogtreecommitdiff
path: root/libguile/regex-posix.c
diff options
context:
space:
mode:
authorKeisuke Nishida <kxn30@po.cwru.edu>2001-02-02 04:56:25 +0000
committerKeisuke Nishida <kxn30@po.cwru.edu>2001-02-02 04:56:25 +0000
commit00ffa0e7d666ed7d7b4f7a63c95de69d18e2bee8 (patch)
treed779edbe115e20363242e8cacec89ae6e596560b /libguile/regex-posix.c
parentb8446ce883e7155def42f479a39b6a870b318720 (diff)
downloadguile-00ffa0e7d666ed7d7b4f7a63c95de69d18e2bee8.tar.gz
New functions: scm_c_make_vector, scm_c_make_hash_table.
Diffstat (limited to 'libguile/regex-posix.c')
-rw-r--r--libguile/regex-posix.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/regex-posix.c b/libguile/regex-posix.c
index 0abb4b8da..da18e9119 100644
--- a/libguile/regex-posix.c
+++ b/libguile/regex-posix.c
@@ -254,7 +254,7 @@ SCM_DEFINE (scm_regexp_exec, "regexp-exec", 2, 2, 0,
int i;
/* The match vector must include a cell for the string that was matched,
so add 1. */
- mvec = scm_make_vector (SCM_MAKINUM (nmatches + 1), SCM_UNSPECIFIED);
+ mvec = scm_c_make_vector (nmatches + 1, SCM_UNSPECIFIED);
SCM_VELTS(mvec)[0] = str;
for (i = 0; i < nmatches; ++i)
if (matches[i].rm_so == -1)