Changes in src/Parser/lex.ll [b6ad601:e15853c]

File:

• src/Parser/lex.ll (modified) (5 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 Nov  1 20:57:35 2018
- * Update Count     : 687
+ * Last Modified On : Wed Feb 13 17:33:53 2019
+ * Update Count     : 702
  */
 
@@ -39 +39 @@
 using namespace std;
 
+#include "config.h"                                                                             // configure info
 #include "ParseNode.h"
 #include "TypedefTable.h"
@@ -59 +60 @@
 #define IDENTIFIER_RETURN()     RETURN_VAL( typedefTable.isKind( yytext ) )
 #define ATTRIBUTE_RETURN()      RETURN_VAL( ATTR_IDENTIFIER )
+
+#ifdef HAVE_KEYWORDS_FLOATXX                                                            // GCC >= 7 => keyword, otherwise typedef
+#define FLOATXX(v) KEYWORD_RETURN(v);
+#else
+#define FLOATXX(v) IDENTIFIER_RETURN(); 
+#endif // HAVE_KEYWORDS_FLOATXX
 
 void rm_underscore() {
@@ -112 +119 @@
                                 // GCC: D (double) and iI (imaginary) suffixes, and DL (long double)
 exponent "_"?[eE]"_"?[+-]?{decimal_digits}
-floating_size 32|64|80|128
-floating_length ([fFdDlL]|[lL]{floating_size})
+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"))?
@@ -240 +247 @@
 finally                 { KEYWORD_RETURN(FINALLY); }                    // CFA
 float                   { KEYWORD_RETURN(FLOAT); }
-_Float32                { KEYWORD_RETURN(FLOAT); }                              // GCC
-_Float32x               { KEYWORD_RETURN(FLOAT); }                              // GCC
-_Float64                { KEYWORD_RETURN(DOUBLE); }                             // GCC
-_Float64x               { KEYWORD_RETURN(DOUBLE); }                             // GCC
-__float80               { KEYWORD_RETURN(FLOAT80); }                    // GCC
-float80                 { KEYWORD_RETURN(FLOAT80); }                    // GCC
-_Float128               { KEYWORD_RETURN(FLOAT128); }                   // GCC
-_Float128x              { KEYWORD_RETURN(FLOAT128); }                   // GCC
-__float128              { KEYWORD_RETURN(FLOAT128); }                   // GCC
-float128                { KEYWORD_RETURN(FLOAT128); }                   // GCC
+__float80               { KEYWORD_RETURN(uuFLOAT80); }                  // GCC
+float80                 { KEYWORD_RETURN(uuFLOAT80); }                  // GCC
+__float128              { KEYWORD_RETURN(uuFLOAT128); }                 // GCC
+float128                { KEYWORD_RETURN(uuFLOAT128); }                 // GCC
+_Float16                { FLOATXX(uFLOAT16); }                                  // GCC
+_Float32                { FLOATXX(uFLOAT32); }                                  // GCC
+_Float32x               { FLOATXX(uFLOAT32X); }                                 // GCC
+_Float64                { FLOATXX(uFLOAT64); }                                  // GCC
+_Float64x               { FLOATXX(uFLOAT64X); }                                 // GCC
+_Float128               { FLOATXX(uFLOAT128); }                                 // GCC
+_Float128x              { FLOATXX(uFLOAT128); }                                 // GCC
 for                             { KEYWORD_RETURN(FOR); }
 forall                  { KEYWORD_RETURN(FORALL); }                             // CFA