io.monitors: fix example (reported by levy in #concatenative0

db4
Slava Pestov 2009-05-21 23:27:42 -05:00
parent 4b2a2a9d0a
commit 327a213f93
1 changed files with 2 additions and 2 deletions
basis/io/monitors

View File

@ -112,10 +112,10 @@ $nl
{ $code
"USE: io.monitors"
": watch-loop ( monitor -- )"
" dup next-change . nl nl flush watch-loop ;"
" dup next-change path>> print nl nl flush watch-loop ;"
""
": watch-directory ( path -- )"
" [ t [ watch-loop ] with-monitor ] with-monitors"
" [ t [ watch-loop ] with-monitor ] with-monitors ;"
} ;
ABOUT: "io.monitors"