Converting numbers in ocaml, the lazy way

nums.ml

open Core.Std;;

let read_and_convert =
    let rec aux line = 
        match line with
        | None -> () (* EOF *)
        | Some txt -> 
            try print_endline (Int.to_string (Int.of_string txt)); with
                Failure detail -> print_endline detail; ; (* End of try/with*)
                aux (In_channel.input_line In_channel.stdin)
    in
        aux (In_channel.input_line In_channel.stdin)
;;

read_and_convert;;