RosettaCodeData/Task/Unix-ls/OCaml/unix-ls.ml

4 lines
69 B
OCaml

let () =
Array.iter print_endline (
Sys.readdir Sys.argv.(1) )