\ Include a file from the arg list
: process-arg ( argnum )
dup 0 > over argc < and
if
." include "
4 * argv + @ dup zcount type cr
zcount included
else
drop
then
;