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

Fix stack effect decl in listener.factor and mismatched dynamic stack effect for error hook in remote.factor

db4
Erik Charlebois 2010-02-13 03:50:04 -08:00
parent 8861dfb834
commit 68c5335d50
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/listener/listener.factor
View File

@ -48,7 +48,7 @@ SYMBOL: error-hook
: call-error-hook ( error -- ) : call-error-hook ( error -- )
error-continuation get error-hook get error-continuation get error-hook get
call( error continuation -- ) ; call( continuation error -- ) ;
[ drop print-error-and-restarts ] error-hook set-global [ drop print-error-and-restarts ] error-hook set-global

2
extra/fuel/remote/remote.factor
View File

@ -8,7 +8,7 @@ IN: fuel.remote
<PRIVATE <PRIVATE
: start-listener ( -- ) : start-listener ( -- )
[ [ print-error-and-restarts ] error-hook set listener ] with-scope ; [ [ print-error-and-restarts drop ] error-hook set listener ] with-scope ;
: server ( port -- server ) : server ( port -- server )
utf8 <threaded-server> utf8 <threaded-server>