RosettaCodeData/Task/Command-line-arguments/Forth/command-line-arguments-1.fth
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

5 lines
114 B
Forth

\ args.f: print each command line argument on a separate line
: main
argc @ 0 do i arg type cr loop ;
main bye