steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

{ } 2sequence => 2array

db4
Slava Pestov 2008-07-06 18:11:59 -05:00
parent 3794561f0f
commit 3358e399d7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/ctags/ctags.factor
View File

@ -4,7 +4,7 @@
! Simple Ctags generator ! Simple Ctags generator
! Alfredo Beaumont <alfredo.beaumont@gmail.com> ! Alfredo Beaumont <alfredo.beaumont@gmail.com>
USING: kernel sequences io io.files io.backend USING: arrays kernel sequences io io.files io.backend
io.encodings.ascii math.parser vocabs definitions io.encodings.ascii math.parser vocabs definitions
namespaces words sorting ; namespaces words sorting ;
IN: ctags IN: ctags
@ -24,7 +24,7 @@ IN: ctags
: (ctags) ( -- seq ) : (ctags) ( -- seq )
{ } all-words [ { } all-words [
dup where [ dup where [
{ } 2sequence suffix 2array suffix
] [ ] [
drop drop
] if* ] if*