Hi my following code gives a "Syntax Error" and i have no idea why...
Any basic mistake you can see?
(* 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 is an exception taking a string as parameter.