Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-10 22:37:38 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix UTF8 support for pack_env_variables()

Browse source
This commit is contained in:
Justin Ethier 2017-11-06 17:06:12 +00:00
parent ec5ef86b6a
commit d43d019c20
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
runtime.c
View file

@ -178,10 +178,10 @@ void pack_env_variables(void *data, object k)
svar->hdr.grayed = 0; svar->hdr.grayed = 0;
svar->tag = string_tag; svar->tag = string_tag;
svar->len = eqpos - e; svar->len = eqpos - e;
svar->num_cp = svar->len; // TODO: proper UTF-8 support!
svar->str = alloca(sizeof(char) * (svar->len)); svar->str = alloca(sizeof(char) * (svar->len));
strncpy(svar->str, e, svar->len); strncpy(svar->str, e, svar->len);
(svar->str)[svar->len] = '\0'; (svar->str)[svar->len] = '\0';
svar->num_cp = Cyc_utf8_count_code_points((uint8_t *)svar->str);
if (eqpos) { if (eqpos) {
eqpos++; eqpos++;
@ -190,7 +190,7 @@ void pack_env_variables(void *data, object k)
sval->hdr.grayed = 0; sval->hdr.grayed = 0;
sval->tag = string_tag; sval->tag = string_tag;
sval->len = strlen(eqpos); sval->len = strlen(eqpos);
sval->num_cp = sval->len; // TODO: proper UTF-8 support! svar->num_cp = Cyc_utf8_count_code_points((uint8_t *)eqpos);
sval->str = eqpos; sval->str = eqpos;
set_pair(tmp, svar, sval); set_pair(tmp, svar, sval);
set_pair(p, tmp, NULL); set_pair(p, tmp, NULL);