> module MuxCore where > import DHSCore > data MuxMsg = ConnectMe String (Maybe Port) -- client -> mux > | Connected Port -- mux answers > | Relay Pid String -- normal mgs > deriving (Read,Show)