[cvs-nhc98] Change 'foldr (++) []' to 'concat'.