Modified: MacRuby/branches/icu/string.c (3722 => 3723)

--- MacRuby/branches/icu/string.c	2010-03-10 01:53:55 UTC (rev 3722)
+++ MacRuby/branches/icu/string.c	2010-03-10 01:54:21 UTC (rev 3723)
@@ -5226,6 +5226,15 @@
     str_splice(RSTR(rcv), range.location, range.length, spat, true);
 }
 
+// :nodoc:
+static VALUE
+nsdata_to_str(VALUE data, SEL sel)
+{
+    CFDataRef dataref = (CFDataRef)data;
+    return rb_bstr_new_with_data(CFDataGetBytePtr(dataref),
+	    CFDataGetLength(dataref));
+}
+
 void
 Init_String(void)
 {
@@ -5373,6 +5382,11 @@
     rb_fs = Qnil;
     rb_define_variable("$;", &rb_fs);
     rb_define_variable("$-F", &rb_fs);
+
+    // NSData extensions.
+    VALUE NSData = (VALUE)objc_getClass("NSData");
+    assert(NSData != 0);
+    rb_objc_define_method(NSData, "to_str", nsdata_to_str, 0);
 }
 
 bool