basis: removing unnecessary method stack effects.

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

diff --git a/basis/windows/winsock/winsock.factor b/basis/windows/winsock/winsock.factor
index 4fb2ef7fbce2e8acf884fb4f660a00185fb8f250..f10c13d5a94264592aa64f4465f0ca952784ada4 100644 (file)
--- a/basis/windows/winsock/winsock.factor
+++ b/basis/windows/winsock/winsock.factor
@@ -158,10 +158,10 @@ STRUCT: timeval
 
 GENERIC: sockaddr>ip ( sockaddr -- string )
 
-M: sockaddr-in sockaddr>ip ( sockaddr -- string )
+M: sockaddr-in sockaddr>ip
     addr>> uint <ref> [ number>string ] { } map-as "." join ;
 
-M: sockaddr-in6 sockaddr>ip ( uchar-array -- string )
+M: sockaddr-in6 sockaddr>ip
     addr>> [ >hex ] { } map-as 2 group [ concat ] map ":" join ;
 
 STRUCT: fd_set