From bcc86baf45c5aaf2a9788ee0db7f0a5b4741d53f Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 26 Aug 2012 00:04:53 -0700
Subject: [PATCH] io.sockets: Minor cleanup.

---
 basis/io/sockets/sockets.factor         | 2 +-
 basis/io/sockets/windows/windows.factor | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/io/sockets/sockets.factor b/basis/io/sockets/sockets.factor
index 3f68c62a6a..596b6bfc22 100644
--- a/basis/io/sockets/sockets.factor
+++ b/basis/io/sockets/sockets.factor
@@ -348,7 +348,7 @@ SYMBOL: remote-address
         [ (accept) ] keep
         parse-sockaddr swap
         <ports>
-    ] keep encoding>> <encoder-duplex> swap ;
+    ] [ encoding>> ] bi <encoder-duplex> swap ;
 
 : <datagram> ( addrspec -- datagram )
     [
diff --git a/basis/io/sockets/windows/windows.factor b/basis/io/sockets/windows/windows.factor
index b3b001ecbf..ee70e74cce 100755
--- a/basis/io/sockets/windows/windows.factor
+++ b/basis/io/sockets/windows/windows.factor
@@ -96,7 +96,7 @@ M: windows (broadcast) ( datagram -- datagram )
     int <ref> malloc-byte-array ; inline
 
 M: windows WSASocket-flags ( -- DWORD )
-    WSA_FLAG_OVERLAPPED ;
+    WSA_FLAG_OVERLAPPED ; inline
 
 : get-ConnectEx-ptr ( socket -- void* )
     SIO_GET_EXTENSION_FUNCTION_POINTER