diff options
| author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-10-03 11:20:31 +0000 |
|---|---|---|
| committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-10-03 11:20:31 +0000 |
| commit | 34e08faac40ffff9a36cf29f8a307654f7f495cd (patch) | |
| tree | 6670d9fc55dcd61ef25bd527f056fb47697633ae /ext/tcltklib/tcltklib.c | |
| parent | 8e011248465bae7b06203bc2c260432454bcac21 (diff) | |
| download | ruby-34e08faac40ffff9a36cf29f8a307654f7f495cd.tar.gz ruby-34e08faac40ffff9a36cf29f8a307654f7f495cd.tar.xz ruby-34e08faac40ffff9a36cf29f8a307654f7f495cd.zip | |
* bcc32/mkexports.rb: to work on cygwin via telnet.
[ruby-win32:358]
* ext/tcltklib/tcltklib.c (ip_invoke): requires command name
argument. [ruby-dev:18438]
* eval.c (ruby_init, ruby_options): Init_stack() with local
location. (ruby-bugs-ja:PR#277)
* eval.c (rb_call0): disable trace call. [ruby-dev:18074]
* eval.c (eval, rb_load): enable trace call. [ruby-dev:18074]
* eval.c (rb_f_require): set source file name for extension
libraries. [ruby-dev:18445]
* ruby.c (translate_char): translate a character in a string;
DOSISH only. [ruby-dev:18274]
* ruby.c (ruby_init_loadpath): added argv[0] handling under
Human68K. [ruby-dev:18274]
* ruby.c (proc_options): translate directory separator in $0 to
'/'. [ruby-dev:18274]
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@2929 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tcltklib/tcltklib.c')
| -rw-r--r-- | ext/tcltklib/tcltklib.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c index c90a807ae..f4a307c9a 100644 --- a/ext/tcltklib/tcltklib.c +++ b/ext/tcltklib/tcltklib.c @@ -767,6 +767,9 @@ ip_invoke(argc, argv, obj) VALUE *alloc_argv, *alloc_result; Tcl_QueuePosition position; + if (argc < 1) { + rb_raise(rb_eArgError, "command name missing"); + } if (eventloop_thread == 0 || current == eventloop_thread) { DUMP2("invoke from current eventloop %lx", current); return ip_invoke_real(argc, argv, obj); |