Remove some unused words
parent
30f93f547f
commit
f3f3b3e769
|
@ -22,9 +22,3 @@ M: macro definition "macro" word-prop ;
|
||||||
|
|
||||||
M: macro reset-word
|
M: macro reset-word
|
||||||
[ call-next-method ] [ f "macro" set-word-prop ] bi ;
|
[ call-next-method ] [ f "macro" set-word-prop ] bi ;
|
||||||
|
|
||||||
: n*quot ( n seq -- seq' ) <repetition> concat >quotation ;
|
|
||||||
|
|
||||||
: saver ( n -- quot ) \ >r <repetition> >quotation ;
|
|
||||||
|
|
||||||
: restorer ( n -- quot ) \ r> <repetition> >quotation ;
|
|
||||||
|
|
Loading…
Reference in New Issue