Diff for /parser3/src/main/compile.y between versions 1.82 and 1.84

version 1.82, 2001/03/10 11:44:41 version 1.84, 2001/03/10 15:17:46
Line 496  string_inside_quotes_value: maybe_codes Line 496  string_inside_quotes_value: maybe_codes
 /* basics */  /* basics */
   
 write_string: STRING {  write_string: STRING {
         $$=$1;          // optimized from OP_STRING+OP_WRITE to OP_STRING__WRITE
         O($$, OP_WRITE);          change_string_literal_to_write_string_literal($$=$1)
 };  };
   
 empty_double_value: /* empty */ { $$=VL(NEW VDouble(POOL, 0)) };  empty_double_value: /* empty */ { $$=VL(NEW VDouble(POOL, 0)) };
Line 770  int yylex(YYSTYPE *lvalp, void *pc) { Line 770  int yylex(YYSTYPE *lvalp, void *pc) {
                                 switch(c) {                                  switch(c) {
                                 case '+': case '-': case '*': case '/': case '%':                                   case '+': case '-': case '*': case '/': case '%': 
                                 case '&': case '|':                                   case '&': case '|': 
                                 case '<': case '>': case '=': case '!':                                  case '=': case '!':
                                         pop_LS(PC);                                          pop_LS(PC);
                                         PC->source--;  if(--PC->col<0) { PC->line--;  PC->col=-1; }                                          PC->source--;  if(--PC->col<0) { PC->line--;  PC->col=-1; }
                                         result=EON;                                          result=EON;
Line 782  int yylex(YYSTYPE *lvalp, void *pc) { Line 782  int yylex(YYSTYPE *lvalp, void *pc) {
                         case ' ': case '\t': case '\n':                          case ' ': case '\t': case '\n':
                         case ';':                          case ';':
                         case ']': case '}': case ')': case '"':                          case ']': case '}': case ')': case '"':
                           case '<': case '>':  // these stand for HTML brackets and expression binary ops
                                 pop_LS(PC);                                  pop_LS(PC);
                                 PC->source--;  if(--PC->col<0) { PC->line--;  PC->col=-1; }                                  PC->source--;  if(--PC->col<0) { PC->line--;  PC->col=-1; }
                                 result=EON;                                  result=EON;

Removed from v.1.82  
changed lines
  Added in v.1.84


E-mail: