"alien.remote-control" require
] unless
- "cpu." cpu append require
+ "cpu." cpu word-name append require
-: enable-compiler ( -- )
- [ optimized-recompile-hook ] recompile-hook set-global ;
-
-: disable-compiler ( -- )
- [ default-recompile-hook ] recompile-hook set-global ;
-
enable-compiler
nl
M: inotify-task do-io-task ( task -- )
io-task-port read-notifications f ;
- M: linux-io init-io ( -- )
+ M: linux init-io ( -- )
<select-mx>
[ mx set-global ]
- [ [ init-inotify ] curry ignore-errors ] bi ;
+ [ init-inotify ] bi ;
- T{ linux-io } set-io-backend
+ linux set-io-backend
[ start-wait-thread ] "io.unix.linux" add-init-hook