// picoc: columns = term_getcols(); static void pterm_getcols(pstate *p, val *r, val **param, int n) { r->Val->UnsignedInteger = term_get_cols(); }
// Lua: columns = getcols() static int luaterm_getcols( lua_State* L ) { lua_pushinteger( L, term_get_cols() ); return 1; }
// (term-getcols) -> num any plisp_term_getcols(any x) { x = box(term_get_cols()); return x; }