summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--bignum.c6
-rw-r--r--lib/tk.rb3
-rw-r--r--ruby.12
-rw-r--r--time.c2
4 files changed, 8 insertions, 5 deletions
diff --git a/bignum.c b/bignum.c
index 17d9c839c5..357a17dba4 100644
--- a/bignum.c
+++ b/bignum.c
@@ -24,13 +24,13 @@ VALUE cBignum;
#define BIGLO(x) ((x) & (BIGRAD-1))
static VALUE
-bignew_1(class, len, sign)
- VALUE class;
+bignew_1(klass, len, sign)
+ VALUE klass;
UINT len;
char sign;
{
NEWOBJ(big, struct RBignum);
- OBJSETUP(big, cBignum, T_BIGNUM);
+ OBJSETUP(big, klass, T_BIGNUM);
big->sign = sign;
big->len = len;
BDIGITS(big) = ALLOC_N(USHORT, len);
diff --git a/lib/tk.rb b/lib/tk.rb
index 8bb6c7f842..5a3bf2052b 100644
--- a/lib/tk.rb
+++ b/lib/tk.rb
@@ -26,6 +26,9 @@ module TkComm
private :error_at
def tk_tcl2ruby(val)
+ if val.include? ?
+ return val.split.collect{|v| tk_tcl2ruby(v)}
+ end
case val
when /^-?\d+$/
val.to_i
diff --git a/ruby.1 b/ruby.1
index fe1e76007a..8a349eada6 100644
--- a/ruby.1
+++ b/ruby.1
@@ -272,7 +272,7 @@ example:
.ne 3
\& #! /usr/local/bin/ruby -s
\& # prints "true" if invoked with `-xyz' switch.
-\& print "true\n" if $xyz
+\& print "true\en" if $xyz
.fi
.TP
.B -S
diff --git a/time.c b/time.c
index f1b40a3606..7dd2bb6286 100644
--- a/time.c
+++ b/time.c
@@ -201,7 +201,7 @@ time_arg(argc, argv, args)
}
/* value validation */
- if ( args[0] < 70|| args[1] > 137
+ if ( args[0] < 70|| args[0] > 137
|| args[1] < 0 || args[1] > 11
|| args[2] < 1 || args[2] > 31
|| args[3] < 0 || args[3] > 23