windows.winsock: the servent structure is different between 32-bit and 64-bit.

[factor.git] / basis / windows / winsock / 32 / 32.factor

diff --git a/basis/windows/winsock/32/32.factor b/basis/windows/winsock/32/32.factor
new file mode 100644 (file)
index 0000000..1667bde
--- /dev/null
+++ b/basis/windows/winsock/32/32.factor
@@ -0,0 +1,8 @@
+USING: alien.c-types classes.struct ;
+IN: windows.winsock.32
+
+STRUCT: servent
+    { name c-string }
+    { aliases void* }
+    { port int }
+    { proto c-string } ;