Datei zeilenweise lesen und in einer Liste speichern

Question

Ich habe eine input.txt Datei mit ein paar Zeilen Text. Ich versuche, diese Zeilen in einer Liste zu speichern. Ich denke, ich mache es richtig, aber list l wird nicht aktualisiert. bitte hilfe.

let l = [] 
let() = 
    let ic = open_in "input.txt" 
    in 
    try 
    while true do 
     let line = input_line ic 
     in 
     let rec append(a, b) = match a with 
     |[] -> [b] 
     |c::cs -> c::append(cs,b) 
     in 
     append(l, line) 
     (* print_endline line *) 
    done 
    with End_of_file -> 
close_in ic;; 

Abgesehen von Warnung 10, bekomme ich keinen Fehler.

Answer 1

let l = [] 

Variablen in OCaml sind unveränderlich, also egal, welchen Code Sie nach dieser Zeile schreiben, wird l immer [] gleich sein.

Answer 2

Es sieht so aus, als ob Sie in zwingender Programmierung gefangen sind - eine gute Sache, mit OCaml zu beginnen!

Typische funktionelle und rekursive Programmierung würde eine Datei wie folgt lesen:

eine Zeile lesen, dann, um es „eine Zeile gelesen“ anhängen. Am Ende der Datei beenden Sie die Liste mit [].