Ich möchte einige Zahlen aus einer Datei lesen, in eine Liste aufnehmen und sie schließlich auf dem Bildschirm anzeigen. numbers.txt hat momentan2 3 5 7 11 Aber als Ausgabe bekomme ich11 7 5 3 2 - : unit = ()

Warum passiert dies

let rec int_list_from_sb sb n = 
match n with 
| 0 -> [];
| _ -> (bscanf sb " %d" (fun a -> a))::(int_list_from_sb sb (n - 1));;

let file_name = open_in "numbers.txt" in 
let sb = Scanning.from_channel file_name in 
let int_list = int_list_from_sb sb 5 in
List.iter (fun a -> print_int a) int_list;;