| 16 | extern char** environ; |
| 17 | |
| 18 | void unsetenv(const char* name) { |
| 19 | const int n = strlen(name); |
| 20 | char** dst = environ; |
| 21 | for (char** src = environ; *src; src++) |
| 22 | if (strncmp(*src, name, n) || (*src)[n] != '=') |
| 23 | *dst++ = *src; |
| 24 | *dst = NULL; |
| 25 | } |
| 26 | #endif |
| 27 | |
| 28 | static int RunModule(const char* modname) |