From 8b4d4a9da83023da12e9bd896b953fd2051a2917 Mon Sep 17 00:00:00 2001
From: Richard Kenner <kenner@gcc.gnu.org>
Date: Sun, 13 Aug 1995 21:47:34 -0400
Subject: [PATCH] (sel_get_any_typed_uid): New function.

From-SVN: r10233
---
 gcc/objc/selector.c | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/gcc/objc/selector.c b/gcc/objc/selector.c
index 0be75d1c168..be68f4f1dbb 100644
--- a/gcc/objc/selector.c
+++ b/gcc/objc/selector.c
@@ -146,6 +146,29 @@ sel_get_typed_uid (const char *name, const char *types)
   return 0;
 }
 
+/* Return selector representing name; prefer a selector with non-NULL type */
+SEL
+sel_get_any_typed_uid (const char *name)
+{
+  struct objc_list *l;
+  sidx i;
+  SEL s;
+
+  i = (sidx) hash_value_for_key (__objc_selector_hash, name);
+  if (i == 0)
+    return 0;
+
+  for (l = (struct objc_list*)sarray_get (__objc_selector_array, i);
+       l; l = l->tail)
+    {
+      s = (SEL) l->head;
+      if (s->sel_types)
+	return s;
+    }
+
+  return s;
+}
+
 /* return selector representing name */
 SEL
 sel_get_any_uid (const char *name)
-- 
2.30.2