Fixing everything for mandatory stack effects

[factor.git] / extra / benchmark / sockets / sockets.factor

diff --git a/extra/benchmark/sockets/sockets.factor b/extra/benchmark/sockets/sockets.factor
index 673a67d93f68b8e6ec5e62c036ecbfb0d3abe865..66c9c11167d8fda2233e332ea46cfb251a90612f 100755 (executable)
--- a/extra/benchmark/sockets/sockets.factor
+++ b/extra/benchmark/sockets/sockets.factor
@@ -8,7 +8,7 @@ SYMBOL: counter
 
 : number-of-requests 1 ;
 
-: server-addr "127.0.0.1" 7777 <inet4> ;
+: server-addr ( -- addr ) "127.0.0.1" 7777 <inet4> ;
 
 : server-loop ( server -- )
     dup accept drop [