RosettaCodeData/Task/Command-line-arguments/LSE64/command-line-arguments.lse64

argc , nl  # number of arguments (including command itself)
0         # argument
dup arg dup 0 = || ,t  1 + repeat
drop