12 lines
159 B
Standard ML
12 lines
159 B
Standard ML
signature MAILBOX_TYPE =
|
|
sig
|
|
datatype t =
|
|
DRAW of DrawMsg.t
|
|
end
|
|
|
|
structure MailboxType :> MAILBOX_TYPE =
|
|
struct
|
|
datatype t =
|
|
DRAW of DrawMsg.t
|
|
end
|