1 files changed, 2 insertions, 2 deletions
diff --git a/awkgram.y b/awkgram.y
index 80278810..345816d3 100644
--- a/awkgram.y
+++ b/awkgram.y
@@ -3994,7 +3994,7 @@ retry:
 
 		base = 10;
 		if (! do_traditional) {
-			base = get_numbase(tokstart, false);
+			base = get_numbase(tokstart, strlen(tokstart)-1, false);
 			if (do_lint) {
 				if (base == 8)
 					lintwarn("numeric constant `%.*s' treated as octal",
@@ -4030,7 +4030,7 @@ retry:
 		}
 #endif
 		if (base != 10)
-			d = nondec2awknum(tokstart, strlen(tokstart), NULL);
+			d = nondec2awknum(tokstart, strlen(tokstart)-1, NULL);
 		else
 			d = atof(tokstart);
 		yylval->memory = make_profile_number(d, tokstart, strlen(tokstart) - 1);