let find_current_gen_options kf = try fst (FuncOptionTbl.find kf) with Not_found -> Parameter_map.empty_gen