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

rewrote (write-message)

db4
Sascha Matzke 2009-01-31 16:04:19 +01:00
parent 9838b6fee1
commit 5dacbdaace
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mongodb/msg/msg.factor
View File

@ -252,8 +252,8 @@ PRIVATE>
<PRIVATE <PRIVATE
: (write-message) ( message quot -- ) : (write-message) ( message quot -- )
[ binary ] dip with-byte-writer dup [ binary ] dip with-byte-writer
[ length write-header ] dip [ length write-header ] keep
write flush ; inline write flush ; inline
PRIVATE> PRIVATE>