steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

io.sockets: rename (receive) to (receive-unsafe)

db4
Joe Groff 2011-10-17 21:18:16 -07:00
parent 9a812cc5c9
commit 90e1002349
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/io/sockets/sockets.factor
View File

@ -287,7 +287,7 @@ TUPLE: raw-port < port addr ;
HOOK: (raw) io-backend ( addr -- raw )
HOOK: (receive) io-backend ( n buf datagram -- size addrspec )
HOOK: (receive-unsafe) io-backend ( n buf datagram -- size addrspec )
ERROR: invalid-port object ;
@ -371,7 +371,7 @@ SYMBOL: remote-address
: receive-unsafe ( n buf datagram -- count addrspec )
check-receive
[ (receive) ] [ addr>> ] bi parse-sockaddr ; inline
[ (receive-unsafe) ] [ addr>> ] bi parse-sockaddr ; inline
CONSTANT: datagram-size 65536

2
basis/io/sockets/unix/unix.factor
View File

@ -140,7 +140,7 @@ M: unix (raw)
2drop [ +input+ wait-for-port ] [ (receive-loop) ] bi
] if ; inline recursive
M: unix (receive) ( n buf datagram -- count sockaddr )
M: unix (receive-unsafe) ( n buf datagram -- count sockaddr )
(receive-loop) ;
:: do-send ( packet sockaddr len socket datagram -- )

2
basis/io/sockets/windows/windows.factor
View File

@ -258,7 +258,7 @@ TUPLE: WSARecvFrom-args port
[ lpFromLen>> int deref ]
tri memcpy ; inline
M: windows (receive) ( n buf datagram -- count addrspec )
M: windows (receive-unsafe) ( n buf datagram -- count addrspec )
[
<WSARecvFrom-args>
[ call-WSARecvFrom ]