5 lines
180 B
OCaml
5 lines
180 B
OCaml
let () =
|
|
Printf.printf "This program is named %s.\n" Sys.argv.(0);
|
|
for i = 1 to Array.length Sys.argv - 1 do
|
|
Printf.printf "the argument #%d is %s\n" i Sys.argv.(i)
|
|
done
|