suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

rktio: fix normalization of envvar names on Windows

Browse Source
This commit is contained in:
Matthew Flatt 2017-06-18 17:05:00 -06:00
parent 4250d51f08
commit 8d857245a4
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
racket/src/racket/src/string.c
View File

@ -2414,6 +2414,7 @@ static Scheme_Object *env_copy(int argc, Scheme_Object *argv[])
for (i = rktio_envvars_count(scheme_rktio, envvars); i--; ) { for (i = rktio_envvars_count(scheme_rktio, envvars); i--; ) {
var = scheme_make_immutable_sized_byte_string(rktio_envvars_name_ref(scheme_rktio, envvars, i), -1, 1); var = scheme_make_immutable_sized_byte_string(rktio_envvars_name_ref(scheme_rktio, envvars, i), -1, 1);
val = scheme_make_immutable_sized_byte_string(rktio_envvars_value_ref(scheme_rktio, envvars, i), -1, 1); val = scheme_make_immutable_sized_byte_string(rktio_envvars_value_ref(scheme_rktio, envvars, i), -1, 1);
var = normalize_env_case(var);
ht = scheme_hash_tree_set(ht, var, val); ht = scheme_hash_tree_set(ht, var, val);
} }