Reputation: 107
I'm trying to figure out why this is not working, I get Error: Syntax Error. Did I miss a ";" somewhere ?
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
Thank you.
Upvotes: 1
Views: 1271
Reputation: 198294
I think you're missing an in
about two lines up:
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
;;
I don't have ocaml installed on this machine, can't check...
Upvotes: 4