Bonjour à tous,
Je sais que c'est un mauvais timing à cause des fêtes mais cela fait 15 jours que je bloque sur une fonction qui doit lire un fichier jusqu'à End_of_file et enregistrer chaque ligne dans une liste j'ai alors utilisé cette fonction :
le problème est que lors de la compilation ocaml me dit que (a::l) doit avoir le type unit alors que input_line prend un in_channel et renvoie un string et que ma liste est vide initialement donc elle est du type 'a list donc normalement a::l ne devrait pas poser de problème si quelqu'un a une solution je suis volontier preneur s'il vous plaît !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 let ouverture = function nom_fichier -> open_in ("/home/Bureau/"^(nom_fichier)^".QT") ;; let recup nom_fichier l = let ic = ouverture nom_fichier in let rec recup_rec () l = try let a = input_line ic in (a::l); recup_rec () l; with End_of_file -> close_in ic in recup_rec () l ;;
Bonne journée et bonnes fêtes !
Partager