RosettaCodeData/Task/Integer-sequence/OCaml/integer-sequence-1.ocaml

8 lines
103 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
let () =
let i = ref 0 in
while true do
print_int !i;
print_newline ();
incr i;
done