help.lint: flush
parent
cb9261d975
commit
13e2de5cae
|
@ -69,7 +69,7 @@ PRIVATE>
|
||||||
'[ _ vocab-help [ article drop ] when* ] check-something ;
|
'[ _ vocab-help [ article drop ] when* ] check-something ;
|
||||||
|
|
||||||
: check-vocab ( vocab -- )
|
: check-vocab ( vocab -- )
|
||||||
"Checking " write dup write "..." print
|
"Checking " write dup write "..." print flush
|
||||||
[ check-about ]
|
[ check-about ]
|
||||||
[ words [ check-word ] each ]
|
[ words [ check-word ] each ]
|
||||||
[ vocab-articles get at [ check-article ] each ]
|
[ vocab-articles get at [ check-article ] each ]
|
||||||
|
|
Loading…
Reference in New Issue