diff --git a/core/bootstrap/stage2.factor b/core/bootstrap/stage2.factor index 9dd56c6524..cd99796e7e 100755 --- a/core/bootstrap/stage2.factor +++ b/core/bootstrap/stage2.factor @@ -111,7 +111,8 @@ SYMBOL: bootstrap-time "output-image" get resource-path save-image-and-exit ] if ] [ - print-error :c restarts. + :c + print-error restarts. "listener" vocab-main execute 1 exit ] recover diff --git a/extra/io/unix/linux/linux.factor b/extra/io/unix/linux/linux.factor index 960f0652fc..70f8038baf 100755 --- a/extra/io/unix/linux/linux.factor +++ b/extra/io/unix/linux/linux.factor @@ -42,8 +42,8 @@ TUPLE: inotify watches ; [ dup ] keep watches set-at ; : remove-watch ( monitor -- ) - dup linux-monitor-wd watches delete-at - linux-monitor-wd inotify-fd swap inotify_rm_watch io-error ; + dup simple-monitor-handle watches delete-at + simple-monitor-handle inotify-fd swap inotify_rm_watch io-error ; M: linux-io ( path recursive? -- monitor ) drop IN_CHANGE_EVENTS add-watch ;