package.path = "/?;/?.lua;"..package.path

_G.ERRLOG = {}
_G.oldprint = print
_G.print = function(...)
	o = {}
	for ix = 1,select('#',...) do
		o[ix] = tostring(select(ix,...))
	end
	table.insert(_G.ERRLOG,table.concat(o,"\t"))
	_G.oldprint(...)
end
_G.rpr = function() _G.print = _G.oldprint end

print("uu")
local load_pnm = require("load_pnm").load
print("uu")
local better_disp = require("better_disp")
print("uu")
local disp_common = require("disp_common")
local perr = require("util").perr
print("uu")

local function msgh(e)
	local tb = debug.traceback()
	return e.."\n"..tb
end


local file,err = io.open(arg[1],"rb")
perr(err,"io.open")
local ff = file:read("a")
local img = load_pnm(ff)
local W = window.create(term.current(),20,10,20,20)
W.clear()
print("the")
print(xpcall(function() better_disp.disp(W,img,1,1) end,msgh))
print("endthe")
os.pullEvent("key")
disp_common.reset_palette(term.current())