getenv_
dolp = (vp || getenv_(name)) ? S_1 /* "1" */ : S_0 /* "0" */;
np = getenv_(name);
extern tchar *getenv_(tchar *);