Revision

4393

Author

lsansonetti@apple.com

Date

2010-07-30 01:20:31 -0700 (Fri, 30 Jul 2010)

Log Message

adding 2 more frightening MRI methods

Modified Paths

• MacRuby/trunk/encoding.c
• MacRuby/trunk/string.c

Diff

--- MacRuby/trunk/encoding.c	2010-07-29 19:08:54 UTC (rev 4392)
+++ MacRuby/trunk/encoding.c	2010-07-30 08:20:31 UTC (rev 4393)
@@ -560,3 +560,14 @@
     assert(idx >= 0 && idx < ENCODINGS_COUNT);
     return rb_encodings[idx];
 }
+
+VALUE
+rb_enc_associate_index(VALUE obj, int idx)
+{
+    if (TYPE(obj) == T_STRING) {
+	assert(idx >= 0 && idx < ENCODINGS_COUNT);
+	rb_str_force_encoding(obj, rb_encodings[idx]);
+	return obj;
+    }
+    rb_raise(rb_eArgError, "cannot set encoding on non-string object");
+}

--- MacRuby/trunk/string.c	2010-07-29 19:08:54 UTC (rev 4392)
+++ MacRuby/trunk/string.c	2010-07-30 08:20:31 UTC (rev 4393)
@@ -6567,3 +6567,14 @@
     RSTR(str)->encoding = enc;
     return str;
 }
+
+VALUE
+rb_str_export_to_enc(VALUE str, rb_encoding *enc)
+{
+    if (!IS_RSTR(str)) {
+	rb_raise(rb_eArgError, "cannot transcode NSString");
+    }
+    return (VALUE)str_transcode(RSTR(str), RSTR(str)->encoding, enc,
+	    TRANSCODE_BEHAVIOR_RAISE_EXCEPTION,
+	    TRANSCODE_BEHAVIOR_RAISE_EXCEPTION, NULL);
+}