From df9d49d0881d9596b9b7d23dbd42950d5048bd9d Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 25 Aug 2000 08:26:06 +0000
Subject: matz

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@903 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 string.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'string.c')

diff --git a/string.c b/string.c
index b9399c2fd1..01f3f03d15 100644
--- a/string.c
+++ b/string.c
@@ -2753,6 +2753,18 @@ rb_str_center(str, w)
     return res;
 }
 
+void
+rb_str_setter(val, id, var)
+    VALUE val;
+    ID id;
+    VALUE *var;
+{
+    if (!NIL_P(val) && TYPE(val) != T_STRING) {
+	rb_raise(rb_eTypeError, "value of %s must be String", rb_id2name(id));
+    }
+    *var = val;
+}
+
 void
 Init_String()
 {
-- 
cgit v1.2.3