Fix +load hash list. Special script for runtime-info.h on mingw32

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

ChangeLog.GNUstep

@@ -1,5 +1,12 @@
-2001-05-04  Adam Fedor  <fedor@gnu.org>
+2001-05-24  Adam Fedor  <fedor@gnu.org>
+
+	* init.c (__objc_send_message_in_list): Use method_imp as hash key
+	(typo fix);
 
+	* GNUmakefile (runtime-info.h): Special rule for mingw32 using...
+	* get-runtime-info: New script.
+
+2001-05-04  Adam Fedor  <fedor@gnu.org>
 
 	* Previous changes before importing into GNUstep CVS.
 	* hash.c (hash_add): cast cachep to int.

GNUmakefile

@@ -165,11 +165,16 @@ endif
 $(GNUSTEP_OBJ_DIR)/thr-backends: $(GNUSTEP_OBJ_DIR)
 	@if [ ! -d $@ ]; then echo mkdir $@; mkdir $@; fi
 
+ifeq ($(GNUSTEP_TARGET_OS),mingw32)
+runtime-info.h: 
+	./get-runtime-info $(CC1OBJ)
+else
 runtime-info.h: 
 		echo "" > tmp-runtime
 		echo "/* This file is automatically generated */" > $@
 		$(CC1OBJ) -print-objc-runtime-info tmp-runtime >> $@
 		rm -f tmp-runtime
+endif
 
 
 after-clean::

get-runtime-info

@@ -0,0 +1,16 @@
+#!/bin/sh
+
+if test x"$1" = z; then
+  CC1OBJ=gcc
+else
+  CC1OBJ=$1
+fi
+
+if test "$GNUSTEP_HOST_OS" = mingw32; then
+  CC1OBJ=`cygpath -u $CC1OBJ`
+fi
+rm -f tmp-runtime
+echo "" > tmp-runtime
+echo "/* This file is automatically generated */" > runtime-info.h
+$CC1OBJ -print-objc-runtime-info tmp-runtime >> runtime-info.h
+rm -f tmp-runtime

init.c

@@ -313,7 +313,7 @@ __objc_send_message_in_list (MethodList_t method_list, Class class, SEL op)
       Method_t mth = &method_list->method_list[i];
 
       if (mth->method_name && sel_eq (mth->method_name, op)
-	  && !hash_is_key_in_hash (__objc_load_methods, mth->method_name))
+	  && !hash_is_key_in_hash (__objc_load_methods, mth->method_imp))
 	{
 	  /* The method was found and wasn't previously executed. */
 	  (*mth->method_imp) ((id)class, mth->method_name);