[cvs-nhc98] hPutStr internal error