Move 1988-2004 entries into subdirs
We we move 1988-2004 entries from all of a year's winning entries in a single directory to each winner being in their own sub-directory under the given year directory.
This commit is contained in:
1 parent
1e82e8aa3e
commit
d2a42f42e8
478 files changed
No files matched your search
@@ -0,0 +1,15 @@
|
||||
: printfour
|
||||
|
||||
dup ( save the number on top of the stack )
|
||||
4 = ( compare it to four )
|
||||
if
|
||||
" forth " ( output a string for it )
|
||||
drop ( and delete the saved value )
|
||||
else
|
||||
.
|
||||
endif
|
||||
;
|
||||
|
||||
: demo3 10 0 do i printfour loop cr ;
|
||||
|
||||
demo3
|
||||
Reference in new issue
Block a user