Changes in src/Parser/lex.ll [dd51906:e7aed49]
- File:
-
- 1 edited
-
src/Parser/lex.ll (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
src/Parser/lex.ll
rdd51906 re7aed49 10 10 * Created On : Sat Sep 22 08:58:10 2001 11 11 * Last Modified By : Peter A. Buhr 12 * Last Modified On : Mon Jun 6 18:08:27201613 * Update Count : 45 112 * Last Modified On : Wed Jun 22 21:20:18 2016 13 * Update Count : 456 14 14 */ 15 15 … … 49 49 50 50 void rm_underscore() { 51 // remove underscores in numeric constant52 int j= 0;51 // Remove underscores in numeric constant by copying the non-underscore characters to the front of the string. 52 yyleng = 0; 53 53 for ( int i = 0; yytext[i] != '\0'; i += 1 ) { 54 54 if ( yytext[i] != '_' ) { 55 yytext[ j] = yytext[i];56 j+= 1;55 yytext[yyleng] = yytext[i]; 56 yyleng += 1; 57 57 } // if 58 58 } // for 59 yyleng = j;60 59 yytext[yyleng] = '\0'; 61 60 } … … 121 120 h_white [ ]|{h_tab} 122 121 123 // o perators122 // overloadable operators 124 123 op_unary_only "~"|"!" 125 124 op_unary_binary "+"|"-"|"*" … … 129 128 op_binary_only "/"|"%"|"^"|"&"|"|"|"<"|">"|"="|"=="|"!="|"<<"|">>"|"<="|">="|"+="|"-="|"*="|"/="|"%="|"&="|"|="|"^="|"<<="|">>=" 130 129 op_binary_over {op_unary_binary}|{op_binary_only} 131 op_binary_not_over "?"|"->"|"&&"|"||"132 operator {op_unary_pre_post}|{op_binary_over}|{op_binary_not_over}130 // op_binary_not_over "?"|"->"|"."|"&&"|"||"|"@=" 131 // operator {op_unary_pre_post}|{op_binary_over}|{op_binary_not_over} 133 132 134 133 %x COMMENT … … 362 361 363 362 "@=" { NAMEDOP_RETURN(ATassign); } 364 ":=" { NAMEDOP_RETURN(REFassign); }365 363 366 364 /* CFA, operator identifier */
Note:
See TracChangeset
for help on using the changeset viewer.