summaryrefslogtreecommitdiffstats
path: root/ffi.c
diff options
context:
space:
mode:
Diffstat (limited to 'ffi.c')
-rw-r--r--ffi.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/ffi.c b/ffi.c
index 6428bf91..8388b5cf 100644
--- a/ffi.c
+++ b/ffi.c
@@ -5877,11 +5877,11 @@ val carray_replace(val carray, val values, val from, val to)
} else if (newrange < oldrange) {
cnum delta = oldrange - newrange;
memmove(ptr + newrange, ptr + oldrange, tail);
- memset(ptr + whole - delta, 0, delta);
+ memset(scry->data + whole - delta, 0, delta);
}
}
- for (; fn < vn; fn++, ptr += elsize) {
+ for (; fn < sn; fn++, ptr += elsize) {
val item = seq_geti(&item_iter);
eltft->put(eltft, item, ptr, self);
}