Ocaml：语法错误

Question

我想弄清楚为什么这不起作用，我得到错误：语法错误。我错过了一个“;”某处？

let way_tags_to_hashtbl way = 
    let hashtbl = Hashtbl.create 1 in 
    let rec way_tags_to_hashtbl_partial list = match list with 
    | a::list' -> Hashtbl.add hashtbl (a.k, a.v); way_tags_to_hashtbl_partial list' 
    | a::[] -> Hashtbl.add hashtbl (a.k, a.v) 
    | [] -> []; 
    way_tags_to_hashtbl_partial way.wtag; hashtbl 
;; <------ ERROR HERE 

谢谢。

Answer 1

我认为你缺少一个in大约两行了：

let way_tags_to_hashtbl way = 
    let hashtbl = Hashtbl.create 1 in 
    let rec way_tags_to_hashtbl_partial list = match list with 
    | a::list' -> Hashtbl.add hashtbl (a.k, a.v); way_tags_to_hashtbl_partial list' 
    | a::[] -> Hashtbl.add hashtbl (a.k, a.v) 
    | [] -> [] in (* !!! HERE !!! *) 
    way_tags_to_hashtbl_partial way.wtag; hashtbl 
;; 

我没有ocaml的本机上安装，无法检查...