pike.git / src / docode.c

version» Context lines:

pike.git/src/docode.c:669:    if(do_docode(CAR(n),0)!=1)    fatal("Compiler internal error.\n");    tmp1=do_jump(n->token,-1);    if(do_docode(CDR(n),0)!=1)    fatal("Compiler internal error.\n");    set_branch(tmp1,PC);    return 1;       case F_EQ:    case F_NE: -  if(flags & DO_POP) -  { -  do_pop(do_docode(CAR(n),DO_NOT_COPY|DO_POP)+ -  do_docode(CDR(n),DO_NOT_COPY|DO_POP)); -  return 0; -  } -  tmp1=do_docode(CAR(n),0); -  if(do_docode(CDR(n),0)!=1) -  fatal("Compiler internal error (gnng!).\n"); -  ins_f_byte(n->token); -  return tmp1; -  +     case F_ADD:    case F_LT:    case F_LE:    case F_GT:    case F_GE:    case F_SUBTRACT:    case F_MULTIPLY:    case F_DIVIDE:    case F_MOD:    case F_LSH:    case F_RSH:    case F_XOR:    case F_OR:    case F_AND: -  if(flags & DO_POP) -  { -  do_pop(do_docode(CAR(n),DO_NOT_COPY|DO_POP)+ -  do_docode(CDR(n),DO_NOT_COPY|DO_POP)); -  return 0; -  } -  tmp1=do_docode(CAR(n),DO_NOT_COPY); -  if(do_docode(CDR(n),DO_NOT_COPY)!=1) -  fatal("Compiler internal error.\n"); -  ins_f_byte(n->token); -  return tmp1; +  case F_NOT: +  case F_COMPL: +  case F_NEGATE: +  fatal("Optimizer errror.\n");       case F_RANGE:    tmp1=do_docode(CAR(n),DO_NOT_COPY);    if(do_docode(CDR(n),DO_NOT_COPY)!=2)    fatal("Compiler internal error.\n");    ins_f_byte(n->token);    return tmp1;       case F_INC:    case F_POST_INC:
pike.git/src/docode.c:747:   #endif    if(flags & DO_POP)    {    ins_f_byte(F_DEC_AND_POP);    return 0;    }else{    ins_f_byte(n->token);    return 1;    }    -  case F_NOT: -  case F_COMPL: -  case F_NEGATE: -  tmp1=do_docode(CAR(n),DO_NOT_COPY | (flags & ~DO_LVALUE)); -  if(flags & DO_POP) -  { -  do_pop(tmp1); -  return 0; -  } -  ins_f_byte(n->token); -  return tmp1; -  +     case F_FOR:    {    struct jump_list brk,cnt;    INT32 *prev_switch_jumptable = current_switch_jumptable;    current_switch_jumptable=0;       push_break_stack(&brk);    push_continue_stack(&cnt);    if(CDR(n))    {