# # $Id: error.icn,v 1.1 2004/02/12 17:07:55 rparlett Exp $ # package util class Error(reason) method error(a) if type(a) == "string" then reason := a else reason := a.get_reason() end method get_reason() return reason end end