From 4bdeaad1125a76eb06ede230250f6d3b71641c48 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Thu, 9 Jul 2015 19:06:19 -0700 Subject: [PATCH] init: cleaner using "initialize" instead of "global [ ... ] cache". --- core/init/init.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/core/init/init.factor b/core/init/init.factor index d7554aee2f..fbdf156bef 100644 --- a/core/init/init.factor +++ b/core/init/init.factor @@ -7,8 +7,8 @@ IN: init SYMBOL: startup-hooks SYMBOL: shutdown-hooks -startup-hooks global [ drop V{ } clone ] cache drop -shutdown-hooks global [ drop V{ } clone ] cache drop +startup-hooks [ V{ } clone ] initialize +shutdown-hooks [ V{ } clone ] initialize : do-hooks ( symbol -- ) get [ nip call( -- ) ] assoc-each ;