Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-20 22:29:16 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

WIP

Browse source
This commit is contained in:
Justin Ethier 2017-11-07 18:39:12 -05:00
parent d584cf059e
commit 61a18d8fb3
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
runtime.c
View file

@ -2189,6 +2189,12 @@ fprintf(stderr, "DEBUG %s, num_cp = %d, len = %d\n", raw, string_num_cp(str), le
// - buf_len < bytes, just replace, but pad with NULL chars.
// in this case need to ensure string_len is not
// reduced because original value still matters for GC purposes
//else if (buf_len < bytes) {
// for (i = 0; i < buf_len; i++) {
// this_cp[i] = buf[i];
// }
// TODO: memcpy remaining string, ensure trailing null is setup correctly, consolidate with above??
//}
else {
Cyc_rt_raise2(data, "string-set! - unable to modify character", chr);
}