Remove some unused words
parent
30f93f547f
commit
f3f3b3e769
|
@ -22,9 +22,3 @@ M: macro definition "macro" word-prop ;
|
|||
|
||||
M: macro reset-word
|
||||
[ 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