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

Fix channels.remote to/from words

db4
Chris Double 2009-10-29 18:01:45 +13:00
parent dc6bc9d327
commit 6b7d723982
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/channels/remote/remote.factor
View File

@ -53,12 +53,12 @@ C: <remote-channel> remote-channel
M: remote-channel to ( value remote-channel -- )
[ [ \ to , id>> , , ] { } make ] keep
node>> "remote-channels" <remote-process>
node>> "remote-channels" swap <remote-process>
send-synchronous no-channel = [ no-channel throw ] when ;
M: remote-channel from ( remote-channel -- value )
[ [ \ from , id>> , ] { } make ] keep
node>> "remote-channels" <remote-process>
node>> "remote-channels" swap <remote-process>
send-synchronous dup no-channel = [ no-channel throw ] when* ;
[