[cvs-nhc98] Implemented correct matching of newtype data constructors