[macruby-changes] [212] MacRuby/trunk/objc.m

[source_changes at macosforge.org]

Revision: 212
          http://trac.macosforge.org/projects/ruby/changeset/212
Author:   lsansonetti at apple.com
Date:     2008-05-23 02:02:27 -0700 (Fri, 23 May 2008)

Log Message:
-----------
fix for #16

Modified Paths:
--------------
    MacRuby/trunk/objc.m

Modified: MacRuby/trunk/objc.m
===================================================================
--- MacRuby/trunk/objc.m	2008-05-23 03:38:56 UTC (rev 211)
+++ MacRuby/trunk/objc.m	2008-05-23 09:02:27 UTC (rev 212)
@@ -2860,6 +2860,12 @@
     return false;
 }
 
+static void 
+timer_cb(CFRunLoopTimerRef timer, void *ctx)
+{
+    RUBY_VM_CHECK_INTS();
+}
+
 void
 Init_ObjC(void)
 {
@@ -2893,4 +2899,11 @@
 #endif
 
     rb_define_global_function("load_bridge_support_file", rb_objc_load_bs, 1);
+
+    {
+	CFRunLoopTimerRef timer;
+	timer = CFRunLoopTimerCreate(NULL,
+		CFAbsoluteTimeGetCurrent(), 0.1, 0, 0, timer_cb, NULL);
+	CFRunLoopAddTimer(CFRunLoopGetMain(), timer, kCFRunLoopDefaultMode);
+    }
 }

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macruby-changes/attachments/20080523/3cad3fa9/attachment.htm