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

Fix I/O typo

slava 2006-04-28 04:19:58 +00:00
parent 5329b91aa8
commit 9e44e78d9c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
library/unix/io.factor
View File

@ -260,8 +260,8 @@ M: write-task do-io-task
M: write-task task-container drop write-tasks get-global ; M: write-task task-container drop write-tasks get-global ;
: add-write-io-task ( callback task -- ) : add-write-io-task ( callback task -- )
write-tasks get-global hash [ dup io-task-fd write-tasks get-global hash [
[ io-task-callbacks enque ] [ add-io-task ] ?if io-task-callbacks enque
] [ ] [
add-io-task add-io-task
] if* ; ] if* ;