pituicat/src/Affection/MessageBus/Message/Class.hs
2018-09-25 07:02:33 +02:00

7 lines
188 B
Haskell

module Affection.MessageBus.Message.Class where
-- | Typeclass definition for messages
class Message msg where
-- | return the time when the message was sent
msgTime :: msg -> Double