wip

git-svn-id: http://svn.macosforge.org/repository/ruby/MacRuby/branches/lrz_unstable@437 23306eb0-4c56-4727-a40e-e92c0eb68959

ext/extmk.rb

@@ -85,7 +85,6 @@ def extract_makefile(makefile, keep = true)
 end
 
 def extmake(target)
-GC.start
   print "#{$message} #{target}\n"
   $stdout.flush
   if $force_static or $static_ext[target]
@@ -431,8 +430,6 @@ def $mflags.defined?(var)
 FileUtils::makedirs('ext')
 Dir::chdir('ext')
 
-GC.start
-
 hdrdir = $hdrdir
 $hdrdir = ($top_srcdir = relative_from(srcdir, $topdir = "..")) + "/include"
 exts.each do |d|

objc.m

@@ -1166,7 +1166,14 @@
 	    }
 	    len = strlen(name_str);
 	    if (name_str[len - 1] != ':') {
-		snprintf(buf, sizeof buf, "%s:", name_str);
+		if (name_str[len - 1] == '=' && isalpha(name_str[len - 2])) {
+		    snprintf(buf, sizeof buf, "set%s", name_str);
+		    buf[3] = toupper(buf[3]);
+		    buf[len + 2] = ':';
+		}
+		else {
+		    snprintf(buf, sizeof buf, "%s:", name_str);
+		}
 		name_sel = sel_registerName(buf);
 	    }
 	}

vm_method.c

@@ -325,7 +325,14 @@ rb_method_node(VALUE klass, ID id)
 	}
 	else {
 	    char buf[100];
-	    snprintf(buf, sizeof buf, "%s:", id_str);
+	    if (id_str[slen - 1] == '=' && isalpha(id_str[slen - 2])) {
+		snprintf(buf, sizeof buf, "set%s", id_str);
+		buf[3] = toupper(buf[3]);
+		buf[slen + 2] = ':';
+	    }
+	    else {
+		snprintf(buf, sizeof buf, "%s:", id_str);
+	    }
 	    return rb_method_node(klass, rb_intern(buf));
 	}
     }