Exemplo n.º 1
0
static void io_write() {
	int32 arg = FIRSTARG;
	LuaFile *f = (LuaFile *)getfileparam(FOUTPUT, &arg);
	int32 status = 1;
	const char *s;
	while ((s = luaL_opt_string(arg++, NULL)) != NULL)
		status = status && ((int32)f->write(s, strlen(s)) != EOF);
	pushresult(status);
}