(if (null? behaviour)
(print "Warning: discarded message " message " to unknown actor " address)
(let ((value (apply behaviour (cons address message))))
(if (null? behaviour)
(print "Warning: discarded message " message " to unknown actor " address)
(let ((value (apply behaviour (cons address message))))