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

Fix stack effect

db4
Slava Pestov 2008-02-21 02:31:37 -06:00
parent 91f4ca6a56
commit 5f02713533
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/io/unix/backend/backend.factor
View File

@ -169,7 +169,7 @@ M: write-task do-io-task
: add-write-io-task ( port continuation -- ) : add-write-io-task ( port continuation -- )
over port-handle mx get-global mx-writes at* over port-handle mx get-global mx-writes at*
[ io-task-callbacks push ] [ io-task-callbacks push drop ]
[ drop <write-task> add-io-task ] if ; [ drop <write-task> add-io-task ] if ;
: (wait-to-write) ( port -- ) : (wait-to-write) ( port -- )