Actually fix GH #17370

I only added a test, but not the change in
9f16475a53933d1d9c547f871b97b3b12160cece.  The test passes except when
run under address sanitizer or valgrind.

(cherry picked from commit dca9f615c2ca4c784ef9cdd9a7a313de40998bcf)

1 files changed, 3 insertions, 0 deletions

diff --git a/numeric.c b/numeric.c
index ee77b257fe..e8e8cadf17 100644
--- a/numeric.c
+++ b/numeric.c
@@ -765,6 +765,9 @@ Perl_grok_infnan(pTHX_ const char** sp, const char* send)
             s++;
 
             flags |= IS_NUMBER_NAN | IS_NUMBER_NOT_INT;
+            if (s == send) {
+                return flags;
+            }
 
             /* NaN can be followed by various stuff (NaNQ, NaNS), but
              * there are also multiple different NaN values, and some