Don't go into an infinite loop for errors generated by hPutStr when
outputing an error message.  Use writeErrString__ to output all errors
(this won't generate a Haskell exception).