Changeset 51c6353 for src/Parser/lex.ll
- Timestamp:
- Sep 1, 2017, 2:42:47 PM (7 years ago)
- Branches:
- ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, deferred_resn, demangler, enum, forall-pointer-decay, jacob/cs343-translation, jenkins-sandbox, master, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, with_gc
- Children:
- 681c764
- Parents:
- a984e65 (diff), 76c62b2 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the(diff)
links above to see all the changes relative to each parent. - File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/Parser/lex.ll
ra984e65 r51c6353 10 10 * Created On : Sat Sep 22 08:58:10 2001 11 11 * Last Modified By : Peter A. Buhr 12 * Last Modified On : Wed Aug 30 17:35:21201713 * Update Count : 5 8412 * Last Modified On : Thu Aug 31 21:30:10 2017 13 * Update Count : 598 14 14 */ 15 15 … … 57 57 yyleng = 0; 58 58 for ( int i = 0; yytext[i] != '\0'; i += 1 ) { 59 if ( yytext[i] == '`' ) { 60 // copy user suffix 61 for ( ; yytext[i] != '\0'; i += 1 ) { 62 yytext[yyleng] = yytext[i]; 63 yyleng += 1; 64 } // for 65 break; 66 } // if 59 67 if ( yytext[i] != '_' ) { 60 68 yytext[yyleng] = yytext[i]; … … 81 89 attr_identifier "@"{identifier} 82 90 91 user_suffix_opt ("`"{identifier})? 92 83 93 // numeric constants, CFA: '_' in constant 84 94 hex_quad {hex}("_"?{hex}){3} 85 integer_suffix "_"?(([uU](("ll"|"LL"|[lL])[iI]|[iI]?("ll"|"LL"|[lL])?))|([iI](("ll"|"LL"|[lL])[uU]|[uU]?("ll"|"LL"|[lL])?))|(("ll"|"LL"|[lL])([iI][uU]|[uU]?[iI]?)))95 integer_suffix_opt ("_"?(([uU](("ll"|"LL"|[lL])[iI]|[iI]?("ll"|"LL"|[lL])?))|([iI](("ll"|"LL"|[lL])[uU]|[uU]?("ll"|"LL"|[lL])?))|(("ll"|"LL"|[lL])([iI][uU]|[uU]?[iI]?))))? 86 96 87 97 octal_digits ({octal})|({octal}({octal}|"_")*{octal}) 88 98 octal_prefix "0""_"? 89 octal_constant (("0")|({octal_prefix}{octal_digits})){integer_suffix }?99 octal_constant (("0")|({octal_prefix}{octal_digits})){integer_suffix_opt}{user_suffix_opt} 90 100 91 101 nonzero_digits ({nonzero})|({nonzero}({decimal}|"_")*{decimal}) 92 decimal_constant {nonzero_digits}{integer_suffix }?102 decimal_constant {nonzero_digits}{integer_suffix_opt}{user_suffix_opt} 93 103 94 104 hex_digits ({hex})|({hex}({hex}|"_")*{hex}) 95 105 hex_prefix "0"[xX]"_"? 96 hex_constant {hex_prefix}{hex_digits}{integer_suffix}? 97 106 hex_constant {hex_prefix}{hex_digits}{integer_suffix_opt}{user_suffix_opt} 107 108 // GCC: D (double) and iI (imaginary) suffixes, and DL (long double) 109 floating_suffix_opt ("_"?([fFdDlL][iI]?|[iI][lLfFdD]?|"DL"))? 98 110 decimal_digits ({decimal})|({decimal}({decimal}|"_")*{decimal}) 99 real_decimal {decimal_digits}"."{exponent}?{floating_suffix }?100 real_fraction "."{decimal_digits}{exponent}?{floating_suffix }?111 real_decimal {decimal_digits}"."{exponent}?{floating_suffix_opt}{user_suffix_opt} 112 real_fraction "."{decimal_digits}{exponent}?{floating_suffix_opt}{user_suffix_opt} 101 113 real_constant {decimal_digits}{real_fraction} 102 114 exponent "_"?[eE]"_"?[+-]?{decimal_digits} 103 // GCC: D (double) and iI (imaginary) suffixes, and DL (long double) 104 floating_suffix "_"?([fFdDlL][iI]?|[iI][lLfFdD]?|"DL") 105 floating_constant (({real_constant}{exponent}?)|({decimal_digits}{exponent})){floating_suffix}? 115 floating_constant (({real_constant}{exponent}?)|({decimal_digits}{exponent})){floating_suffix_opt}{user_suffix_opt} 106 116 107 117 binary_exponent "_"?[pP]"_"?[+-]?{decimal_digits} 108 118 hex_fractional_constant ({hex_digits}?"."{hex_digits})|({hex_digits}".") 109 hex_floating_constant {hex_prefix}(({hex_fractional_constant}{binary_exponent})|({hex_digits}{binary_exponent})){floating_suffix }?119 hex_floating_constant {hex_prefix}(({hex_fractional_constant}{binary_exponent})|({hex_digits}{binary_exponent})){floating_suffix_opt} 110 120 111 121 // character escape sequence, GCC: \e => esc character … … 308 318 ({cwide_prefix}[_]?)?['] { BEGIN QUOTE; rm_underscore(); strtext = new string( yytext, yyleng ); } 309 319 <QUOTE>[^'\\\n]* { strtext->append( yytext, yyleng ); } 310 <QUOTE>['\n] { BEGIN 0; strtext->append( yytext, yyleng ); RETURN_STR(CHARACTERconstant); }320 <QUOTE>['\n]{user_suffix_opt} { BEGIN 0; strtext->append( yytext, yyleng ); RETURN_STR(CHARACTERconstant); } 311 321 /* ' stop highlighting */ 312 322 … … 314 324 ({swide_prefix}[_]?)?["] { BEGIN STRING; rm_underscore(); strtext = new string( yytext, yyleng ); } 315 325 <STRING>[^"\\\n]* { strtext->append( yytext, yyleng ); } 316 <STRING>["\n] { BEGIN 0; strtext->append( yytext, yyleng ); RETURN_STR(STRINGliteral); }326 <STRING>["\n]{user_suffix_opt} { BEGIN 0; strtext->append( yytext, yyleng ); RETURN_STR(STRINGliteral); } 317 327 /* " stop highlighting */ 318 328 … … 387 397 {op_unary}"?" { IDENTIFIER_RETURN(); } // unary 388 398 "?"({op_unary_pre_post}|"()"|"[?]"|"{}") { IDENTIFIER_RETURN(); } 389 "^?{}" { IDENTIFIER_RETURN(); } 399 "^?{}" { IDENTIFIER_RETURN(); } 400 "?`"{identifier} { IDENTIFIER_RETURN(); } // unit operator 390 401 "?"{op_binary_over}"?" { IDENTIFIER_RETURN(); } // binary 391 402 /*
Note: See TracChangeset
for help on using the changeset viewer.