// picoc: lines = term_getlines();
static void pterm_getlines(pstate *p, val *r, val **param, int n)
{
r->Val->UnsignedInteger = term_get_lines();
}
// Lua: lines = getlines()
static int luaterm_getlines( lua_State* L )
{
lua_pushinteger( L, term_get_lines() );
return 1;
}
// (term-getlines) -> num
any plisp_term_getlines(any x) {
x = box(term_get_lines());
return x;
}
