From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 3 Jul 2001 00:19:08 +0000 (+0100)
Subject: grok not grocking correctly
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=51bd16da02fd2d9228605a3672c5bc91eaddf57b;p=p5sagit%2Fp5-mst-13.2.git

grok not grocking correctly
Message-ID: <20010703001908.H59620@plum.flirble.org>

p4raw-id: //depot/perl@11112
---

diff --git a/numeric.c b/numeric.c
index 1aadce5..00d58bc 100644
--- a/numeric.c
+++ b/numeric.c
@@ -448,7 +448,7 @@ Perl_grok_number(pTHX_ const char *pv, STRLEN len, UV *valuep)
                                           break;
                                       }
                                       if (digit >= 0 && digit <= 9
-                                          && !(s < send)) {
+                                          && (s < send)) {
                                         /* value overflowed.
                                            skip the remaining digits, don't
                                            worry about setting *valuep.  */