Small change: use a better idiom
parent
374d72e953
commit
94a613f688
|
@ -22,7 +22,7 @@ IN: ctags
|
||||||
{ } swap [ ctag suffix ] each ;
|
{ } swap [ ctag suffix ] each ;
|
||||||
|
|
||||||
: ctags-write ( seq path -- )
|
: ctags-write ( seq path -- )
|
||||||
>r ctag-strings r> ascii set-file-lines ;
|
[ ctag-strings ] dip ascii set-file-lines ;
|
||||||
|
|
||||||
: (ctags) ( -- seq )
|
: (ctags) ( -- seq )
|
||||||
{ } all-words [
|
{ } all-words [
|
||||||
|
|
Loading…
Reference in New Issue