#
# this is a minimal version of the error reporting procedure
# needed by the parser
#

procedure reportParseError(t)
write(&errout,"error: unexpected input ",t.body,
	" at line ",t.line," column ",t.column)
return
end


