mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-07-22 20:02:53 +00:00
Code Issues 1 Releases Wiki Activity

Switch to mempcy in some slice functions.

Browse Source
This commit is contained in:
Calvin Rose 2018-09-07 16:27:57 -04:00
parent 5baf70f4c6
commit 08dd06918e
2 changed files with 3 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/core/array.c
View File

@ -204,12 +204,9 @@ static int cfun_slice(JanetArgs args) {
if (start < 0) start = len + start; if (start < 0) start = len + start;
if (end < 0) end = len + end + 1; if (end < 0) end = len + end + 1;
if (end >= start) { if (end >= start) {
int32_t i, j;
ret = janet_array(end - start); ret = janet_array(end - start);
for (j = 0, i = start; i < end; j++, i++) { memcpy(ret->data, vals + start, sizeof(Janet) * (end - start));
ret->data[j] = vals[i]; ret->count = end - start;
}
ret->count = j;
} else { } else {
ret = janet_array(0); ret = janet_array(0);
} }

5
src/core/tuple.c
View File

@ -117,11 +117,8 @@ static int cfun_slice(JanetArgs args) {
if (start < 0) start = len + start; if (start < 0) start = len + start;
if (end < 0) end = len + end + 1; if (end < 0) end = len + end + 1;
if (end >= start) { if (end >= start) {
int32_t i, j;
ret = janet_tuple_begin(end - start); ret = janet_tuple_begin(end - start);
for (j = 0, i = start; i < end; j++, i++) { memcpy(ret, vals + start, sizeof(Janet) * (end - start));
ret[j] = vals[i];
}
} else { } else {
ret = janet_tuple_begin(0); ret = janet_tuple_begin(0);
} }