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

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

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