#54 refactoring C2S.Server.hs