move remote-address to public

2008-05-14 15:43:34 -05:00 · 2008-05-14 15:43:34 -05:00 · c6ab75e3f5
parent c012a48920
commit c6ab75e3f5
1 changed files with 2 additions and 2 deletions
--- a/extra/io/server/server.factor
+++ b/extra/io/server/server.factor
@ -8,12 +8,12 @@ IN: io.server

 SYMBOL: servers

+SYMBOL: remote-address
+
 <PRIVATE

 LOG: accepted-connection NOTICE

-SYMBOL: remote-address
-
 : with-connection ( client remote quot -- )
    '[
        , [ remote-address set ] [ accepted-connection ] bi