• [^] # Re: Version fonctionnelle

    Posté par . En réponse à la dépêche OCaml 4.00.0 est sorti. Évalué à 5.

    Il ne manquerait pas une petite inversion de la liste à la fin :

    let lines_of_file filename =
 let rec loop lines ic =
 match maybe_input_line ic with
 | Some line -> loop (line :: lines) ic
 | None -> close_in ic; List.rev lines
 in
 let ic = open_in filename in
 loop [] ic