[foo-cvs] foo/elkfoo/src pointer.m,1.11,1.12

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/src
In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv31548

Modified Files:
	pointer.m 
Log Message:
fixed for osx objc2 api >=10.6

Index: pointer.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/pointer.m,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** pointer.m	28 Feb 2005 16:37:18 -0000	1.11
--- pointer.m	28 Apr 2010 22:41:10 -0000	1.12
***************
*** 353,357 ****
--- 353,361 ----
  	  char *otype = "instance";
  #ifdef NeXT_RUNTIME
+ #if !__OBJC2__
  	  if (CLS_GETINFO(obj->isa, CLS_META))
+ #else
+ 	  if (class_isMetaClass(object_getClass(obj)))
+ #endif
  #elif GNU_RUNTIME
  	  if (CLS_ISMETA(obj->class_pointer))
***************
*** 363,367 ****
--- 367,375 ----
  	    }
  #ifdef NeXT_RUNTIME
+ #if !__OBJC2__
  	  Printf(port, " {%s %s}", obj->isa->name, otype);
+ #else
+ 	  Printf(port, " {%s %s}", object_getClassName(obj), otype);
+ #endif
  #elif GNU_RUNTIME
  	  Printf(port, " {%s %s}", obj->class_pointer->name, otype);