--- a/Socket.st	Tue Mar 03 16:22:24 2020 +0100
+++ b/Socket.st	Wed Mar 04 10:00:32 2020 +0100
@@ -16,10 +16,10 @@
 "{ NameSpace: Smalltalk }"
 
 NonPositionableExternalStream subclass:#Socket
-	instanceVariableNames:'domain socketType protocol port peer peerName listening'
-	classVariableNames:''
-	poolDictionaries:''
-	category:'Streams-External'
+        instanceVariableNames:'domain socketType protocol port peer peerName listening'
+        classVariableNames:''
+        poolDictionaries:''
+        category:'Streams-External'
 !
 
 !Socket primitiveDefinitions!
@@ -4436,9 +4436,10 @@
     // ALWAYS check for proper arguments, please
     OBJ fp = __INST(handle);
 
-    if (__isExternalAddress(bytes)
-     && __isSmallInteger(byteLength)
-     && (fp != NULL)) {
+    if (__isExternalAddressLike(bytes) 
+        && __isSmallInteger(byteLength) 
+        && (fp != NULL)
+    ) {
         int sendResult;
         int wsaErrorNo;
         char *pBytes = __externalAddressVal(bytes);