Changes in src/Parser/lex.ll [1f652a7:15f769c]

File:

• src/Parser/lex.ll (modified) (3 diffs)

src/Parser/lex.ll

@@ -10 +10 @@
  * Created On       : Sat Sep 22 08:58:10 2001
  * Last Modified By : Peter A. Buhr
- * Last Modified On : Thu Apr  1 13:22:31 2021
- * Update Count     : 754
+ * Last Modified On : Sun Jun 20 18:41:09 2021
+ * Update Count     : 759
  */
 
@@ -117 +117 @@
 hex_constant {hex_prefix}{hex_digits}{integer_suffix_opt}
 
-                                // GCC: D (double) and iI (imaginary) suffixes, and DL (long double)
+                                // GCC: floating D (double), imaginary iI, and decimal floating DF, DD, DL
 exponent "_"?[eE]"_"?[+-]?{decimal_digits}
 floating_size 16|32|32x|64|64x|80|128|128x
 floating_length ([fFdDlLwWqQ]|[fF]{floating_size})
 floating_suffix ({floating_length}?[iI]?)|([iI]{floating_length})
-floating_suffix_opt ("_"?({floating_suffix}|"DL"))?
+decimal_floating_suffix [dD][fFdDlL]
+floating_suffix_opt ("_"?({floating_suffix}|{decimal_floating_suffix}))?
 decimal_digits ({decimal})|({decimal}({decimal}|"_")*{decimal})
 floating_decimal {decimal_digits}"."{exponent}?{floating_suffix_opt}
@@ -234 +235 @@
 continue                { KEYWORD_RETURN(CONTINUE); }
 coroutine               { KEYWORD_RETURN(COROUTINE); }                  // CFA
+_Decimal32              { KEYWORD_RETURN(DECIMAL32); }                  // GCC
+_Decimal64              { KEYWORD_RETURN(DECIMAL64); }                  // GCC
+_Decimal128             { KEYWORD_RETURN(DECIMAL128); }                 // GCC
 default                 { KEYWORD_RETURN(DEFAULT); }
 disable                 { KEYWORD_RETURN(DISABLE); }                    // CFA