yields(String *) yieldList() { I _var(Debug, tmp, ctor) as(I); yield(new(String, ctorS, "First yield")); yield(new(String, ctorS, "Second yield")); yield(new(String, ctorS, "Last yield")); yield_break(String *); }
string get_env (string var) { c_string _var (var); char* _ret= getenv (_var); if (_ret==NULL) { if (var == "PWD") return get_env ("HOME"); return ""; } string ret (_ret); return ret; // do not delete _ret ! }
void set_env (string var, string with) { #if defined(STD_SETENV) && !defined(__MINGW32__) c_string _var (var); c_string _with (with); setenv (_var, _with, 1); #else char* _varw= as_charp (var * "=" * with); (void) putenv (_varw); // do not delete _varw !!! // -> known memory leak, but solution more complex than it is worth #endif }
tscalar stdev() const { return std::sqrt(m_count > 1 ? _var() / (m_count - 1) : tscalar(0)); }
tscalar var() const { return _var() / m_count; }