diff options
| author | Yukihiro Matsumoto <matz@ruby-lang.org> | 1996-12-25 00:33:19 +0900 |
|---|---|---|
| committer | Takashi Kokubun <takashikkbn@gmail.com> | 2019-08-17 22:09:32 +0900 |
| commit | ce930d042913722f209bbd3209b6c90a3c71325f (patch) | |
| tree | 7233482f90335a8247ef426607622a8cad067a97 /lib/tkcore.rb | |
| parent | 554b989ba1623b9f6a0b76f00824c83a23fbcbc1 (diff) | |
version 1.0-961225v1_0_961225
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に一応対応
Diffstat (limited to 'lib/tkcore.rb')
| -rw-r--r-- | lib/tkcore.rb | 5 |
1 files changed, 3 insertions, 2 deletions
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 |