嗨，我的以下代码给出了“语法错误”，我不知道为什么......
你能看出任何基本的错误吗？
(* ajouter_itineraire: itineraire -> plan -> plan *)
let ajouter_itineraire (i: itineraire) (p: plan) = match p with
| Vide ->[i]
| Ilist l ->if itineraire_existe(i.num) then
Err("Itineraire deja present") else i::p.Ilist
Err 是一个以字符串为参数的异常。