version 0.67v0_67

https://cache.ruby-lang.org/pub/ruby/1.0/ruby-0.66-0.67.diff.gz

Tue Feb 21 18:56:56 1995  Yukihiro Matsumoto  (matz@ix-02)

	* io.c(STDIN, STDOUT, STDERR): 定数として定義．今までの$stdinなど
	  は将来なくなるかも知れない．

	* io.c(select): bug fix.

	* version 0.67

Mon Feb 20 16:10:14 1995  Yukihiro Matsumoto  (matz@ix-02)

	* parse.y(yylex): 定数を`%識別子'から，第1文字が大文字の識別子に変
	  更．それにともないクラスは定数となった．

	* eval.c: クラス定義内のselfがクラス定義外部のthe_classだった．

	* variable.c(rb_name_class): クラス名をインスタンス変数に格納する．

Thu Feb 16 15:36:17 1995  Yukihiro Matsumoto  (matz@ix-02)

	* parse.y: BLOCKをbraceで表現する文法に変更したものを作ってみる．
	  MLに提示してみるが反応がない．

	* object.c(do,forever): なくした．

Wed Feb 15 13:20:49 1995  Yukihiro Matsumoto  (matz@ix-02)

	* re.c(new): 第2引数が与えられて，かつnilでないときだけ設定するよ
	  うに(以前はnilの時にも設定を行なっていた)．

	* parse.y(parse_regexp): 正規表現リテラルで大文字小文字を無視する
	  かどうか指定できるように．

Tue Feb 14 00:55:33 1995  Yukihiro Matsumoto  (matz@dyna)

	* parse.y: (compexpr) -> (expr).

Fri Feb 10 16:30:00 1995  Yukihiro Matsumoto  (matz@ix-02)

	* ruby.c(load_file): scriptを読み込む時だけ"#!"の解析を行うように．

	* ruby.c(readin): ファイル読み込み時に先頭に"#!"があり，rubyに引数
	  が与えられていれば，その引数も有効になる．

	* parse.y(yylex): コメント行の終りが`\'であった時，次の行に継続し
	  ているとみなすようにした．

1 files changed, 6 insertions, 18 deletions

diff --git a/object.c b/object.c
index a35e683cdd..6266f77493 100644
--- a/object.c
+++ b/object.c
@@ -356,24 +356,15 @@ VALUE boot_defclass(name, super)
     char *name;
     VALUE super;
 {
+    extern st_table *rb_class_tbl;
     struct RClass *obj = (struct RClass*)class_new(super);
+    ID id = rb_intern(name);
 
-    rb_name_class(obj, rb_intern(name));
+    rb_name_class(obj, id);
+    st_add_direct(rb_class_tbl, id, obj);
     return (VALUE)obj;
 }
 
-Fdo()
-{
-    return rb_yield(Qnil);
-}
-
-Fforever()
-{
-    for (;;) {
-	rb_yield(Qnil);
-    }
-}
-
 VALUE TopSelf;
 VALUE TRUE = 1;
 
@@ -437,9 +428,6 @@ Init_Object()
     rb_define_private_method(C_Kernel, "sprintf", Fsprintf, -1);
     rb_define_alias(C_Kernel, "format", "sprintf");
 
-    rb_define_private_method(C_Kernel, "do", Fdo, 0);
-    rb_define_private_method(C_Kernel, "forever", Fforever, 0);
-
     rb_define_private_method(C_Object, "init_object", Fobj_init_object, -1);
 
     rb_define_method(C_Object, "clone", Fobj_clone, 0);
@@ -478,8 +466,8 @@ Init_Object()
 
     TRUE = obj_alloc(C_Object);
     rb_define_single_method(TRUE, "to_s", Ftrue_to_s, 0);
-    rb_define_const(C_Kernel, "%TRUE", TRUE);
-    rb_define_const(C_Kernel, "%FALSE", FALSE);
+    rb_define_const(C_Kernel, "TRUE", TRUE);
+    rb_define_const(C_Kernel, "FALSE", FALSE);
 
     init_object = rb_intern("init_object");
 }