io.sockets: Default make-sockaddr-outgoing to make-sockaddr.

db4
Doug Coleman 2016-03-08 09:21:28 -08:00
parent 7eaa24b3e0
commit a1f3378365
1 changed files with 2 additions and 0 deletions

View File

@ -48,6 +48,8 @@ GENERIC: inet-pton ( str addrspec -- data )
: empty-sockaddr/size ( addrspec -- sockaddr size )
[ empty-sockaddr ] [ sockaddr-size ] bi ;
M: object make-sockaddr-outgoing make-sockaddr ;
GENERIC: parse-sockaddr ( sockaddr addrspec -- newaddrspec )
M: f parse-sockaddr nip ;