windows.winsock: port should be short, not sure if it should be PACKED-STRUCT or...

diff --git a/basis/windows/winsock/32/32.factor b/basis/windows/winsock/32/32.factor
index 1667bdec77ef50cf2f189fabf78d91dacac3dc1f..588a65937c9e22356e7175a3910a08c2715a0aac 100644 (file)
--- a/basis/windows/winsock/32/32.factor
+++ b/basis/windows/winsock/32/32.factor
@@ -4,5 +4,5 @@ IN: windows.winsock.32
 STRUCT: servent
     { name c-string }
     { aliases void* }
-    { port int }
+    { port short }
     { proto c-string } ;

diff --git a/basis/windows/winsock/64/64.factor b/basis/windows/winsock/64/64.factor
index 97ffa8eeaf20f6ec1f1b18ae593ea4a492520954..6f6f8802f17bf17024c31ed64d136fe76beaa21f 100644 (file)
--- a/basis/windows/winsock/64/64.factor
+++ b/basis/windows/winsock/64/64.factor
@@ -5,4 +5,4 @@ STRUCT: servent
     { name c-string }
     { aliases void* }
     { proto c-string }
-    { port int } ;
+    { port short } ;