[cvs-nhc98] Revert hPutStr from fast (but space-leaking) primitive imp