Files
comp3958/lectures/05/number_lines.ml
T

10 lines
148 B
OCaml

let () =
let rec aux acc =
try
Printf.printf "%5d| %s\n" acc @@ read_line ();
aux (acc + 1)
with
| _ -> ()
in
aux 1;;