--- a/Unix.st Fri Jan 12 16:22:08 1996 +0100
+++ b/Unix.st Fri Jan 12 16:27:52 1996 +0100
@@ -3524,7 +3524,12 @@
After enabling, these exceptions will send the message
'signalInterrupt' to the SignalInterruptHandler object."
- self enableSignal:(self sigPIPE).
+ "/ leads to trouble ...
+"/ self enableSignal:(self sigPIPE).
+
+ "/ ... better to ignore them, and let it be handled as a writeErrorSignal.
+ self disableSignal:(self sigPIPE).
+
self enableSignal:(self sigBUS).
self enableSignal:(self sigSEGV)
!
@@ -6302,6 +6307,13 @@
RETURN ( _MKSMALLINT(i) );
}
}
+ } else {
+ if (ret < 0) {
+ if (errno != EINTR) {
+ printf("select errno = %d\n", errno);
+ OperatingSystem_LastErrorNumber = _MKSMALLINT(errno);
+ }
+ }
}
/*
@@ -6367,6 +6379,6 @@
!OperatingSystem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.117 1996-01-06 17:49:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.118 1996-01-12 15:27:52 cg Exp $'
! !
OperatingSystem initialize!