]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/core-foundation/run-loop/run-loop.factor
core/basis/extra: using STARTUP-HOOK: and SHUTDOWN-HOOK:
[factor.git] / basis / core-foundation / run-loop / run-loop.factor
index fbd1ab4b5b8c1677f4c79d71bc800838817b2d7e..666d1043c4fa0d955c44f697229db2b9e483d95a 100644 (file)
@@ -102,8 +102,8 @@ SYMBOL: run-loop
     ] change-timers drop ;
 
 SYMBOL: thread-timer
-[ f thread-timer set-global ]
-"core-foundation.run-loop" add-startup-hook
+
+STARTUP-HOOK: [ f thread-timer set-global ]
 
 : (reset-thread-timer) ( timer -- )
     sleep-time