Function l_print

src/Chain/libraries/glua/single_glua_src/main.cpp:401–411

** Prints (calling the Glua 'print' function) any values on the stack */

** Prints (calling the Glua 'print' function) any values on the stack
*/
static void l_print(lua_State *L) {
	int n = lua_gettop(L);
	if (n > 0) {  /* any result to be printed? */
		luaL_checkstack(L, LUA_MINSTACK, "too many results to print");
		lua_getglobal(L, "print");
		lua_insert(L, 1);
		if (lua_pcall(L, n, 0, 0) != LUA_OK)
			l_message(progname, lua_pushfstring(L, "error calling 'print' (%s)",
				lua_tostring(L, -1)));
	}
}


/*