preparation for adding new additional threads/mailboxes (namely, the file mailbox)
This commit is contained in:
7
message-types/update-msg.sml
Normal file
7
message-types/update-msg.sml
Normal file
@@ -0,0 +1,7 @@
|
||||
signature UPDATE_MESSAGE =
|
||||
sig
|
||||
datatype t = DRAW of DrawMessage.t | FILE of FileMessage.t | NO_MAILBOX
|
||||
end
|
||||
|
||||
structure UpdateMessage :> UPDATE_MESSAGE =
|
||||
struct datatype t = DRAW of DrawMessage.t | FILE of FileMessage.t | NO_MAILBOX end
|
||||
Reference in New Issue
Block a user