quakeforge/tools/qwaq/main.qc

float () main =
{
	local float handle;
	local string buffer;

	handle = open ("builtins.c", 0);
	if (handle == -1) {
		print (strerror (errno ()) + "\n");
		return 1;
	}
	do {
		buffer = read (handle, 1024);
		if (read_result == -1) {
			print (strerror (errno ()) + "\n");
			return 1;
		}
		print (buffer);
	} while (read_result == 1024);
	close (handle);
	return 0;
};