summaryrefslogtreecommitdiff
path: root/srfi/srfi-13.c
diff options
context:
space:
mode:
Diffstat (limited to 'srfi/srfi-13.c')
-rw-r--r--srfi/srfi-13.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/srfi/srfi-13.c b/srfi/srfi-13.c
index bbb20faab..13949b092 100644
--- a/srfi/srfi-13.c
+++ b/srfi/srfi-13.c
@@ -74,7 +74,7 @@ SCM_DEFINE (scm_string_every, "string-every", 2, 2, 0,
SCM_VALIDATE_SUBSTRING_SPEC_COPY (2, s, cstr,
3, start, cstart,
4, end, cend);
- res = SCM_BOOL_F;
+ res = SCM_BOOL_T;
cstr += cstart;
while (cstart < cend)
{