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; }
