oops
authorClaus Gittinger <cg@exept.de>
Wed, 15 Oct 1997 22:20:20 +0200
changeset 3039 7266b1f89ddb
parent 3038 35577248a640
child 3040 ea839412d642
oops
FileStr.st
FileStream.st
--- a/FileStr.st	Wed Oct 15 21:08:29 1997 +0200
+++ b/FileStr.st	Wed Oct 15 22:20:20 1997 +0200
@@ -813,9 +813,9 @@
 	    path = __INST(pathName);
 	} while ((f == NULL) && (errno == EINTR));
 #else
-# ifdef LINUX
 	do {
 	    __BEGIN_INTERRUPTABLE__
+# ifdef LINUX
 	    /* 
 	     * LINUX may return a non-NULL f even when interrupted.
 	     * Therefore, check errno and fake a null-return.
@@ -1010,6 +1010,6 @@
 !FileStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/FileStr.st,v 1.52 1997-10-15 15:11:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/FileStr.st,v 1.53 1997-10-15 20:20:20 cg Exp $'
 ! !
 FileStream initialize!
--- a/FileStream.st	Wed Oct 15 21:08:29 1997 +0200
+++ b/FileStream.st	Wed Oct 15 22:20:20 1997 +0200
@@ -813,9 +813,9 @@
 	    path = __INST(pathName);
 	} while ((f == NULL) && (errno == EINTR));
 #else
-# ifdef LINUX
 	do {
 	    __BEGIN_INTERRUPTABLE__
+# ifdef LINUX
 	    /* 
 	     * LINUX may return a non-NULL f even when interrupted.
 	     * Therefore, check errno and fake a null-return.
@@ -1010,6 +1010,6 @@
 !FileStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.52 1997-10-15 15:11:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.53 1997-10-15 20:20:20 cg Exp $'
 ! !
 FileStream initialize!