Prohibit `r` suffix after scientific notation (e.g. `1e10`).

As CRuby does.

Prohibit `r` suffix after scientific notation (e.g. `1e10`).
As CRuby does.
f20e1068 · Yukihiro "Matz" Matsumoto · cc59860e · f20e1068 · f20e1068
Unverified Commit f20e1068 authored Jan 24, 2021 by Yukihiro "Matz" Matsumoto
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 0 deletions

mrbgems/mruby-compiler/core/parse.y mrbgems/mruby-compiler/core/parse.y +4 -0

mrbgems/mruby-compiler/core/y.tab.c mrbgems/mruby-compiler/core/y.tab.c +4 -0

No files found.
--- a/mrbgems/mruby-compiler/core/parse.y
+++ b/mrbgems/mruby-compiler/core/parse.y
@@ -5856,6 +5856,10 @@ parser_yylex(parser_state *p)
        errno = 0;
      }
      suffix = number_literal_suffix(p);
+      if (seen_e && (suffix & NUM_SUFFIX_R)) {
+        pushback(p, 'r');
+        suffix &= ~NUM_SUFFIX_R;
+      }
      pylval.nd = new_float(p, tok(p), suffix);
      return tFLOAT;
 #endif

--- a/mrbgems/mruby-compiler/core/y.tab.c
+++ b/mrbgems/mruby-compiler/core/y.tab.c
@@ -11892,6 +11892,10 @@ parser_yylex(parser_state *p)
        errno = 0;
      }
      suffix = number_literal_suffix(p);
+      if (seen_e && (suffix & NUM_SUFFIX_R)) {
+        pushback(p, 'r');
+        suffix &= ~NUM_SUFFIX_R;
+      }
      pylval.nd = new_float(p, tok(p), suffix);
      return tFLOAT;
 #endif