Happstack.Server.MessageWrap
class ReadString a