Small bugfix

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/libobjc/trunk@17100 72102866-910b-0410-8b05-ffd578937521

ChangeLog

@@ -1,3 +1,8 @@
+2001-07-04  Richard Frith-Macdonald  <rrfm@gnu.org>
+
+	* Protocol.m: ([-descriptionForClassMethod:])
+	([-descriptionForInstanceMethod:]) fix dereference of null pointer.
+
 2003-02-20  Alexandre Oliva  <aoliva@redhat.com>
 
 	* configure.in: Propagate ORIGINAL_LD_FOR_MULTILIBS to

Protocol.m

@@ -80,10 +80,13 @@ struct objc_method_description_list {
   const char* name = sel_get_name (aSel);
   struct objc_method_description *result;
 
-  for (i = 0; i < instance_methods->count; i++)
+  if (instance_methods != 0)
     {
-      if (!strcmp ((char*)instance_methods->list[i].name, name))
+      for (i = 0; i < instance_methods->count; i++)
-	return &(instance_methods->list[i]);
+	{
+	  if (!strcmp ((char*)instance_methods->list[i].name, name))
+	    return &(instance_methods->list[i]);
+	}
     }
 
   for (proto_list = protocol_list; proto_list; proto_list = proto_list->next)
@@ -107,10 +110,13 @@ struct objc_method_description_list {
   const char* name = sel_get_name (aSel);
   struct objc_method_description *result;
 
-  for (i = 0; i < class_methods->count; i++)
+  if (class_methods != 0)
     {
-      if (!strcmp ((char*)class_methods->list[i].name, name))
+      for (i = 0; i < class_methods->count; i++)
-	return &(class_methods->list[i]);
+	{
+	  if (!strcmp ((char*)class_methods->list[i].name, name))
+	    return &(class_methods->list[i]);
+	}
     }
 
   for (proto_list = protocol_list; proto_list; proto_list = proto_list->next)