Renaming require-if to require-when
parent
043578ca1d
commit
9e602d213f
|
@ -96,7 +96,7 @@ PRIVATE>
|
|||
: require ( vocab -- )
|
||||
load-vocab drop ;
|
||||
|
||||
: require-if ( if then -- )
|
||||
: require-when ( if then -- )
|
||||
over vocab
|
||||
[ nip require ]
|
||||
[ swap conditional-requires get [ swap suffix ] change-at ]
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
USE: vocabs.loader
|
||||
IN: vocabs.loader.test.m
|
||||
|
||||
"vocabs.loader.test.o" "vocabs.loader.test.n" require-if
|
||||
"vocabs.loader.test.o" "vocabs.loader.test.n" require-when
|
||||
|
|
Loading…
Reference in New Issue