UnixOperatingSystem.st
changeset 7461 00fb6fbd9b4f
parent 7460 87fd64b431fc
child 7462 05b5202d988a
--- a/UnixOperatingSystem.st	Mon Jun 30 09:17:29 2003 +0200
+++ b/UnixOperatingSystem.st	Mon Jun 30 10:47:27 2003 +0200
@@ -12393,6 +12393,8 @@
             error = @symbol(badArgument1);
             goto err;
         }
+        bp = (char *)(__byteArrayVal(socketAddress));
+        bp += nInstBytes;
         sa = (struct sockaddr_in *)bp;
     
         if (sp) {
@@ -12456,11 +12458,10 @@
     }
 # endif /* ! NI_NUMERICHOST */
 
-    if (hp)
-        hostName = __MKSTRING(hp);        
-    if (sp)
+    if (hp) 
+        hostName = __MKSTRING(hp);
+    if (sp) 
         serviceName = __MKSTRING(sp);
-
 err:;
 #else
     error = @symbol(notImplemented);
@@ -13346,7 +13347,7 @@
 !UnixOperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.168 2003-06-30 07:17:29 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.169 2003-06-30 08:47:27 stefan Exp $'
 ! !
 
 UnixOperatingSystem initialize!