ExternalStream.st
changeset 10984 fbdee2becb0a
parent 10982 11fd48c1276d
child 10986 91decf6a6e2b
--- a/ExternalStream.st	Tue Apr 29 19:42:07 2008 +0200
+++ b/ExternalStream.st	Tue Apr 29 20:00:33 2008 +0200
@@ -4816,7 +4816,7 @@
 
 #ifdef WIN32
     if (__isExternalAddressLike(anIntegerOrExternalAddress) ) {
-        HANDLE __fileHandle = _HANDLEVal(anIntegerOrExternalAddress);
+        HANDLE __fileHandle = (HANDLE)(__externalAddressVal(anIntegerOrExternalAddress));
         fd = _open_osfhandle(__fileHandle);
     } else
 #endif
@@ -5978,7 +5978,7 @@
 !ExternalStream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.310 2008-04-29 17:35:26 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalStream.st,v 1.311 2008-04-29 18:00:33 stefan Exp $'
 ! !
 
 ExternalStream initialize!