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

[factor.git] / basis / cpu / x86 / features / features.factor

diff --git a/basis/cpu/x86/features/features.factor b/basis/cpu/x86/features/features.factor
index 3091620e9335bd61ab8610bfe62307fcd183474e..358b87145a8d4a5157e229cf3a76e57c1a575601 100644 (file)
--- a/basis/cpu/x86/features/features.factor
+++ b/basis/cpu/x86/features/features.factor
@@ -164,8 +164,9 @@ HOOK: (cpuid) cpu ( rax rcx regs -- )
 MEMO: enable-popcnt? ( -- ? )
     popcnt? "disable-popcnt" get not and ;
 
-[ { sse-version enable-popcnt? } [ reset-memoized ] each ]
-"cpu.x86.features" add-startup-hook
+STARTUP-HOOK: [
+    { sse-version enable-popcnt? } [ reset-memoized ] each
+]
 
 : sse-string ( version -- string )
     {