kuroko-lang/kuroko
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Workaround potentially missing putenv in 'os'

Browse Source
This commit is contained in:
K. Lange 2021-12-01 16:54:34 +09:00
parent f4d51248a5
commit 1b700b1a28
1 changed files with 12 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/os.c
View File

@ -96,14 +96,22 @@ static KrkClass * Environ;
#define IS_Environ(o) (krk_isInstanceOf(o,Environ))
#define CURRENT_CTYPE KrkInstance*
static int _setVar(KrkString * key, KrkString * val) {
#ifndef putenv
return setenv(key->chars, val->chars, 1);
#else
size_t len = key->length + val->length;
char * tmp = malloc(len);
snprintf(tmp, len, "%s=%s", key->chars, val->chars);
int r= putenv(tmp);
#endif
}
KRK_METHOD(Environ,__setitem__,{
METHOD_TAKES_EXACTLY(2);
CHECK_ARG(1,str,KrkString*,key);
CHECK_ARG(2,str,KrkString*,val);
size_t len = key->length + val->length;
char * tmp = malloc(len);
snprintf(tmp, len, "%s=%s", key->chars, val->chars);
int r = putenv(tmp);
int r = _setVar(key,val);
if (r == 0) {
krk_push(argv[0]);
krk_push(argv[1]);