vulkan-tutorial/extern/affection/src/Affection/MessageBus/Message/Class.hs
nek0 8c037f69ce Add 'extern/affection/' from commit '9b7b1c6167b4fa516b91759ca86139ede07f231d'
git-subtree-dir: extern/affection
git-subtree-mainline: f422f94794
git-subtree-split: 9b7b1c6167
2022-07-09 20:36:04 +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