let get_record h optn = try Hashtbl.find h optn with Not_found -> failwith (va "\nCould not find requested function '%s'.\nPlease see --help or --funs\n" optn)