factor: more top level forms.

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

diff --git a/basis/windows/winsock/winsock.factor b/basis/windows/winsock/winsock.factor
index e548959c4f0b03340d65df7efacc681c08e97fa8..20287b63af185a7798dd77344a205098bfe0e2d2 100644 (file)
--- a/basis/windows/winsock/winsock.factor
+++ b/basis/windows/winsock/winsock.factor
@@ -7,10 +7,8 @@ windows.errors windows.kernel32 windows.types ;
 FROM: alien.c-types => short ;
 IN: windows.winsock
 
-<<
-! Some differences between Win32 and Win64
-cpu x86.64? "windows.winsock.64" "windows.winsock.32" ? use-vocab
->>
+USE-X86-64: windows.winsock.64
+USE-X86-32: windows.winsock.32
 
 TYPEDEF: int* SOCKET