Changeset ba01b14 for src/Parser/lex.ll

Timestamp:

Feb 11, 2019, 6:46:56 PM (5 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, persistent-indexer, pthread-emulation, qualifiedEnum

Children:

cdcddfe1

Parents:

0e66857

Message:

update constant parsing add _FloatNN

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 : Mon Feb  4 22:49:19 2019
+ * Update Count     : 701
  */
 
@@ -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
+_Float16                { FLOATXX(_FLOAT16); }                                  // GCC
+_Float32                { FLOATXX(_FLOAT32); }                                  // GCC
+_Float32x               { FLOATXX(_FLOAT32X); }                                 // GCC
+_Float64                { FLOATXX(_FLOAT64); }                                  // GCC
+_Float64x               { FLOATXX(_FLOAT64X); }                                 // GCC
+_Float128               { FLOATXX(_FLOAT128); }                                 // GCC
+_Float128x              { FLOATXX(_FLOAT128); }                                 // GCC
 for                             { KEYWORD_RETURN(FOR); }
 forall                  { KEYWORD_RETURN(FORALL); }                             // CFA