*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sat, 24 Jun 2000 12:57:35 +0200
changeset 5416 93b5fd7ec357
parent 5415 d13be53ae32c
child 5417 0478ac31e042
*** empty log message ***
UnixFileDescriptorHandle.st
--- a/UnixFileDescriptorHandle.st	Sat Jun 24 12:45:31 2000 +0200
+++ b/UnixFileDescriptorHandle.st	Sat Jun 24 12:57:35 2000 +0200
@@ -10,6 +10,7 @@
 !UnixFileDescriptorHandle primitiveDefinitions!
 %{
 #include <stdio.h>
+#include <errno.h>
 %}
 
 ! !
@@ -27,7 +28,7 @@
     INT fd = (INT)(__externalAddressVal(self));
     INT cnt, offs;
     int nInstBytes, objSize;
-#include <errno.h>
+
     if (! __bothSmallInteger(count, firstIndex)) {
         goto bad;
     }
@@ -133,7 +134,7 @@
     INT fd = (INT)(__externalAddressVal(self));
     INT cnt, offs;
     int nInstBytes, objSize;
-#include <errno.h>
+
     if (! __bothSmallInteger(count, firstIndex)) {
         goto bad;
     }
@@ -261,5 +262,5 @@
 !UnixFileDescriptorHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixFileDescriptorHandle.st,v 1.4 2000-06-24 10:45:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixFileDescriptorHandle.st,v 1.5 2000-06-24 10:57:35 cg Exp $'
 ! !