* string.c (rb_str_reverse_bang): forgot to call rb_str_modify().

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_6@1098 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 10 insertions, 0 deletions

diff --git a/object.c b/object.c
index 4e3d5dd856..25156f3a12 100644
--- a/object.c
+++ b/object.c
@@ -286,6 +286,9 @@ rb_obj_taint(obj)
     VALUE obj;
 {
     rb_secure(4);
+    if (OBJ_FROZEN(obj)) {
+	rb_error_frozen("object");
+    }
     OBJ_TAINT(obj);
     return obj;
 }
@@ -295,6 +298,13 @@ rb_obj_untaint(obj)
     VALUE obj;
 {
     rb_secure(3);
+Tue Jan  9 17:41:40 2001  Yukihiro Matsumoto  <matz@ruby-lang.org>
+
+	* object.c (rb_obj_taint): check frozen status before modifying
+	  taint status.
+
+	* object.c (rb_obj_untaint): ditto.
+
     FL_UNSET(obj, FL_TAINT);
     return obj;
 }