+ #+sb-thruption
+ ;; On sb-thruption builds, the usual resignalling of SIGPIPE will
+ ;; work without problems, but the signal handler won't ordinarily
+ ;; think that there's anything to be done. Since we're poking at
+ ;; INTERRUPT-THREAD internals anyway, let's help it along.
+ (setf sb-unix::*thruption-pending* t)