let set ~origin conf name value =
try
(Hashtbl.find metaconf name).parse_set value conf
with
| Not_found ->
failwithf
"Variable %S is not defined in the application.\n%s" name origin
| Parse_error str ->
failwith (str ^ "\n" ^ origin)