compare +parsec

messageCompare :: Message -> Message -> Ordering
parsec Text.ParserCombinators.Parsec.Error