let find_enum_tag _ = raise Not_found