init: cleaner using "initialize" instead of "global [ ... ] cache".
parent
dea0b49283
commit
4bdeaad112
|
@ -7,8 +7,8 @@ IN: init
|
||||||
SYMBOL: startup-hooks
|
SYMBOL: startup-hooks
|
||||||
SYMBOL: shutdown-hooks
|
SYMBOL: shutdown-hooks
|
||||||
|
|
||||||
startup-hooks global [ drop V{ } clone ] cache drop
|
startup-hooks [ V{ } clone ] initialize
|
||||||
shutdown-hooks global [ drop V{ } clone ] cache drop
|
shutdown-hooks [ V{ } clone ] initialize
|
||||||
|
|
||||||
: do-hooks ( symbol -- )
|
: do-hooks ( symbol -- )
|
||||||
get [ nip call( -- ) ] assoc-each ;
|
get [ nip call( -- ) ] assoc-each ;
|
||||||
|
|
Loading…
Reference in New Issue