module Cafp.Messages
    ( ServerMessage (..)
    ) where

data ServerMessage
    = Welcome
    deriving (Show)