summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog10
-rw-r--r--error.c1
-rw-r--r--eval.c1
-rw-r--r--util.c7
4 files changed, 19 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 4969efb952a..38d1d8b58b5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -38,6 +38,11 @@ Mon Sep 23 23:10:16 2003 NAKAMURA, Hiroshi <nahi@ruby-lang.org>
* test/logger/test_logger.rb: ditto.
+Tue Sep 23 20:47:51 2003 Yukihiro Matsumoto <matz@ruby-lang.org>
+
+ * error.c (rb_warn_m): should not warn if -W0 is specified.
+ [ruby-talk:82675]
+
Mon Sep 22 21:28:57 2003 WATANABE Hirofumi <eban@ruby-lang.org>
* MANIFEST: updated.
@@ -46,6 +51,11 @@ Mon Sep 22 19:22:26 2003 GOTOU Yuuzou <gotoyuzo@notwork.org>
* configure.in (AC_CHECK_FUNCS): add setuid and setgid.
+Mon Sep 22 12:34:55 2003 Yukihiro Matsumoto <matz@ruby-lang.org>
+
+ * util.c (ruby_strtod): skip preceding zeros before counting
+ digits in the mantissa. (ruby-bugs PR#1181)
+
Sun Sep 21 04:12:36 2003 GOTOU Yuuzou <gotoyuzo@notwork.org>
* ext/openssl/ossl_ocsp.c (ossl_ocspreq_initialize): the argument
diff --git a/error.c b/error.c
index 2e40408a16c..4cf39d0e1f9 100644
--- a/error.c
+++ b/error.c
@@ -166,6 +166,7 @@ static VALUE
rb_warn_m(self, mesg)
VALUE self, mesg;
{
+ if (NIL_P(ruby_verbose)) return;
rb_io_write(rb_stderr, mesg);
rb_io_write(rb_stderr, rb_default_rs);
return mesg;
diff --git a/eval.c b/eval.c
index ec0a03118ba..897ae7e6027 100644
--- a/eval.c
+++ b/eval.c
@@ -9902,6 +9902,7 @@ rb_thread_atfork()
if (rb_thread_alone()) return;
FOREACH_THREAD(th) {
if (th != curr_thread) {
+ rb_warn("fork terminates thread at %s:%s", th->node->nd_file, nd_line(th->node));
rb_thread_die(th);
}
}
diff --git a/util.c b/util.c
index 9b058e61143..456704492ad 100644
--- a/util.c
+++ b/util.c
@@ -757,6 +757,13 @@ ruby_strtod(string, endPtr)
sign = FALSE;
}
+ /* skip preceding zeros */
+ if (*p == '0') {
+ while (*p == '0')
+ p++;
+ p--;
+ }
+
/*
* Count the number of digits in the mantissa (including the decimal
* point), and also locate the decimal point.