From 122d4994c7ce43b08e66da1c7d1fdce549a3f3ba Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 29 Nov 1999 06:33:02 +0000
Subject: 19991129

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@572 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 variable.c | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'variable.c')

diff --git a/variable.c b/variable.c
index 41f935dff..b29ce55cc 100644
--- a/variable.c
+++ b/variable.c
@@ -195,10 +195,20 @@ VALUE
 rb_path2class(path)
     const char *path;
 {
+    VALUE c;
+
     if (path[0] == '#') {
 	rb_raise(rb_eArgError, "can't retrieve anonymous class %s", path);
     }
-    return rb_eval_string(path);
+    c = rb_eval_string(path);
+    switch (TYPE(c)) {
+      case T_MODULE:
+      case T_CLASS:
+	break;
+      default:
+	rb_raise(rb_eTypeError, "class path %s does not point class", path);
+    }
+    return c;
 }
 
 void
-- 
cgit