I would like to suggest the addition of the following definition.
(define *nothing*
(object ()
((nothing? self) t)
((print self stream) (display "" stream))))
This would be the ideal thing to return when the value of the result
is unimportant.
John