let get_config key = try List.assoc key !config with Not_found -> raise (Missing_configuration_item key)