structure UpdateMessage =
struct datatype t = DRAW of DrawMessage.t | FILE of FileMessage.t end