core/basis/extra: using STARTUP-HOOK: and SHUTDOWN-HOOK:

[factor.git] / basis / random / unix / unix.factor

diff --git a/basis/random/unix/unix.factor b/basis/random/unix/unix.factor
index 060d1afe502c064b17e4803160ddd7aca985f725..ab723bb7e063c4a20248c4f8c062371342774d90 100644 (file)
--- a/basis/random/unix/unix.factor
+++ b/basis/random/unix/unix.factor
@@ -17,7 +17,10 @@ M: unix-random random-bytes*
 
 HINTS: M\ unix-random random-bytes* { fixnum unix-random } ;
 
-[
-    "/dev/random" <unix-random> &dispose secure-random-generator set-global
-    "/dev/urandom" <unix-random> &dispose system-random-generator set-global
-] "random.unix" add-startup-hook
+STARTUP-HOOK: [
+    "/dev/random" <unix-random> &dispose
+    secure-random-generator set-global
+
+    "/dev/urandom" <unix-random> &dispose
+    system-random-generator set-global
+]