From ce930d042913722f209bbd3209b6c90a3c71325f Mon Sep 17 00:00:00 2001
From: Yukihiro Matsumoto <matz@ruby-lang.org>
Date: Wed, 25 Dec 1996 00:33:19 +0900
Subject: version 1.0-961225
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

https://cache.ruby-lang.org/pub/ruby/1.0/ruby-1.0-961225.tar.gz

Wed Dec 25 00:33:19 1996  Yukihiro Matsumoto  <matz@caelum.co.jp>

	* version 1.0-961225

	* io.c (Init_IO): newを無効化

	* lib/tkthcore.rb: tk_call "global $foo; set foo 5"などもできるように

	* eval.c (thread_restore_context): $~, $_でスタックを壊していた

	* process.c (rb_waitpid): threadに一応対応
---
 lib/tkcore.rb | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/tkcore.rb')

diff --git a/lib/tkcore.rb b/lib/tkcore.rb
index df4af669ba..018e140ef0 100644
--- a/lib/tkcore.rb
+++ b/lib/tkcore.rb
@@ -185,7 +185,7 @@ after 120000 keepalive'
   end
 
   $tk_event_queue = []
-  def tk_call(*args)
+  def tk_call(str, *args)
     args = args.collect{|s|
       next if s == None
       if s.kind_of?(Hash)
@@ -204,7 +204,8 @@ after 120000 keepalive'
 	"{#{s}}"
       end
     }
-    str = args.join(" ")
+    str += " "
+    str += args.join(" ")
     print str, "\n" if $DEBUG
     tk_write 'rb_ans %s', str
     while PORT.gets
-- 
cgit v1.2.3