синтаксическая ошибка во время цикла в OCaml

Question

В чем проблема с кодом ниже? Я изо всех сил пытаюсь понять, когда использовать ';' или ';;' или использовать начало в OCaml. Здесь мне нужно прочитать некоторые ребра и вставить в график, но мне нужно связать это с остальной программой, чтобы он мог использовать g (график) со всеми ребрами. Когда я сделать это он говорит об ошибке: Синтаксическая ошибка

let i = ref n in 
while !i > 0 do 
( 
    let pair = read_edge Scanning.stdin in 
    let g = insert_edge (fst pair) (snd pair) g in 
    i := !i - 1 
) 
done in (* giving error in this line *) 

let rec do_stuff l = 
    match l with 
    | [] ->() 
    | h::t -> print_int h;do_stuff t in 

(* more functions) 

Answer 1

in является частью синтаксиса let (это "let" pattern "in" expression). Синтаксис цикла while - это просто "while" expression "do" expression "done", поэтому там нет in.

Для компиляции кода вы можете заменить in на ;, поэтому он выполняет цикл while, за которым следует выражение let после него. Однако мне кажется странным, что у вас будет цикл while между набором определений функций.

Также обратите внимание, что в цикле вы делаете let g = ..., но тогда вы не используете g в любом месте тела let. Так что привязка ничего не выполняет.