Bool OptIC4(CIntermediateCode *tmpi)
{
  I64 i;
  CIntermediateCode *tmpil1,*tmpil2;
  if (tmpi->ic_code<IC_IMM_I64) return FALSE;
  tmpil1=tmpi;
  if (!(tmpil2=OptLag1(tmpil1)))
    return FALSE;
  if (tmpil2->res.type&MDF_STK && !(tmpil2->ic_flags&ICF_PUSH_RES))
  {
    if (tmpil1->ic_code==IC_ADD_CONST && tmpil1->arg1.type&MDF_STK)
    {
      if ((tmpil2->ic_code==IC_REG || tmpil2->ic_code==IC_MOV) &&
          tmpil2->arg1.type&MDF_REG)
      {
        i=tmpil1->ic_data;
        if (I32_MIN<=i<=I32_MAX &&
            !Bt(&cmp.non_ptr_vars_mask,tmpil2->arg1.reg))
        {
          tmpil1->ic_flags|=tmpil2->ic_flags&ICG_NO_CVT_MASK;
          tmpil1->ic_code=IC_LEA;
          tmpil1->arg1.type=MDF_DISP+tmpil1->arg1.type.raw_type;
          tmpil1->arg1.reg=tmpil2->arg1.reg;
          tmpil1->arg1.disp=i;
          OptFree(tmpil2);
          return TRUE;
        }
      }
      else if (tmpil2->ic_code==IC_SHL_CONST && tmpil2->arg1.type&MDF_REG)
      {
        i=tmpil1->ic_data;
        if (I32_MIN<=i<=I32_MAX && tmpil2->arg1.reg!=REG_RSP &&
            1<=tmpil2->ic_data<=3)
        {
          tmpil1->ic_flags|=tmpil2->ic_flags&ICG_NO_CVT_MASK;
          tmpil1->ic_code=IC_LEA;
          tmpil1->arg1.type=MDF_SIB+tmpil1->arg1.type.raw_type;
          tmpil1->arg1.reg=tmpil2->arg1.reg<<8+REG_NONE;
          if (tmpil2->ic_data==1)
            tmpil1->arg1.reg|=0x4000;
          else if (tmpil2->ic_data==2)
            tmpil1->arg1.reg|=0x8000;
          else
            tmpil1->arg1.reg|=0xC000;
          tmpil1->arg1.disp=i;
          OptFree(tmpil2);
          return TRUE;
        }
      }
    }
    if (tmpil2->ic_code==IC_MOV || tmpil2->ic_code==IC_REG)
    {
      if (tmpil1->arg2.type&MDF_STK)
      {
        if (tmpil2->ic_flags & ICF_RES_TO_INT)
        {
          if (tmpil2->arg1.type&MDF_IMM)
            tmpil2->arg1.disp=tmpil2->arg1.disp(F64);
          else
            tmpil1->ic_flags|=ICF_ARG2_TO_INT;
        }
        else if (tmpil2->ic_flags&ICF_RES_TO_F64)
        {
          if (tmpil2->arg1.type&MDF_IMM)
            tmpil2->arg1.disp(F64)=tmpil2->arg1.disp;
          else
            tmpil1->ic_flags|=ICF_ARG2_TO_F64;
        }
        tmpil1->arg2.type=tmpil2->arg1.type&MDG_MASK+
            MinI64(tmpil1->arg2.type.raw_type,
                MinI64(tmpil2->res.type.raw_type,tmpil2->arg1.type.raw_type));
        tmpil1->arg2.reg=tmpil2->arg1.reg;
        tmpil1->arg2.disp=tmpil2->arg1.disp;
        tmpil1->ic_flags|=tmpil2->ic_flags&ICG_NO_CVT_MASK;
        OptSetNOP2(tmpil2);
        return TRUE;
      }
      if (tmpil1->arg1.type&MDF_STK)
      {
        if (tmpil2->ic_flags & ICF_RES_TO_INT)
        {
          if (tmpil2->arg1.type&MDF_IMM)
            tmpil2->arg1.disp=tmpil2->arg1.disp(F64);
          else
            tmpil1->ic_flags|=ICF_ARG1_TO_INT;
        }
        else if (tmpil2->ic_flags&ICF_RES_TO_F64)
        {
          if (tmpil2->arg1.type&MDF_IMM)
          {
            if (tmpil2->arg1.type&RTF_UNSIGNED)
              tmpil2->arg1.disp(F64)=tmpil2->arg1.disp(U64);
            else
              tmpil2->arg1.disp(F64)=tmpil2->arg1.disp(I64);
          }
          else
            tmpil1->ic_flags|=ICF_ARG1_TO_F64;
        }
        tmpil1->arg1.type=tmpil2->arg1.type&MDG_MASK+
            MinI64(tmpil1->arg1.type.raw_type,
                MinI64(tmpil2->res.type.raw_type,tmpil2->arg1.type.raw_type));
        CmpMinTypePointed(tmpil1,tmpil2->arg1_type_pointed_to);
        tmpil1->arg1.reg=tmpil2->arg1.reg;
        tmpil1->arg1.disp=tmpil2->arg1.disp;
        tmpil1->ic_flags|=tmpil2->ic_flags&ICG_NO_CVT_MASK;
        OptSetNOP2(tmpil2);
        return TRUE;
      }
    }
    if (tmpil1->ic_code==IC_DEREF)
    {
      if (tmpil2->ic_code==IC_ADD_CONST && tmpil2->arg1.type&MDF_REG &&
          tmpil1->arg1.type&MDF_STK)
      {
        i=tmpil2->ic_data;
        if (I32_MIN<=i<=I32_MAX &&
            !Bt(&cmp.non_ptr_vars_mask,tmpil2->arg1.reg))
        {
          tmpil1->ic_flags|=tmpil2->ic_flags;
          tmpil1->ic_code=IC_MOV;
          tmpil1->arg1.type=MDF_DISP+tmpil1->arg1_type_pointed_to;
          tmpil1->arg1.reg=tmpil2->arg1.reg;
          tmpil1->arg1.disp=i;
          OptSetNOP2(tmpil2,-1);
          return TRUE;
        }
      }
      if (tmpil2->ic_code==IC_LEA && tmpil1->arg1.type&MDF_STK)
      {
        tmpil1->ic_flags|=tmpil2->ic_flags;
        tmpil1->ic_code=IC_MOV;
        tmpil1->arg1.type=tmpil2->arg1.type&MDG_MASK+
            tmpil1->arg1_type_pointed_to;
        tmpil1->arg1.reg=tmpil2->arg1.reg;
        tmpil1->arg1.disp=tmpil2->arg1.disp;
        OptFree(tmpil2);
        return TRUE;
      }
    }
  }
  if (tmpil1->ic_code==IC_DEREF)
  {
    if (tmpil1->arg1.type&MDF_REG)
    {
      tmpil1->arg1.type=MDF_DISP+tmpil1->arg1_type_pointed_to;
      tmpil1->arg1.disp=0;
      tmpil1->ic_code=IC_MOV;
      return TRUE;
    }
  }
  return FALSE;
}

U0 OptPass4(CCmpCtrl *cc,COptReg *reg_offsets,I64 *_type)
{
  CHashClass *tmpc,*tmpc1,*tmpc2;
  CIntermediateCode *tmpi,*tmpi1,*tmpi2,*tmpil1,*tmpil2,*tmpil3,
                    *tmpi_next;
  I64 code,i;
  Bool dead_code=FALSE;
  CCodeMisc *lb;
  CPrsStk *ps=cc->ps;
  ps->ptr=0;
  ps->ptr2=0;
  if (_type)
    *_type=RT_I64;
  tmpi=cc->coc.coc_head.next;
  while (code=tmpi->ic_code)
  {
    tmpi_next=tmpi->next;
    if (dead_code&&code!=IC_LABEL)
    {
      if (code==IC_JMP||code==IC_SUB_CALL)
      {
        lb=OptLabelFwd(tmpi->ic_data);
        if (lb->use_cnt>0)
          lb->use_cnt--;
      }
      tmpi=OptFree(tmpi);
    }
    else
    {
      tmpc=tmpi->ic_class;
      tmpi1=tmpi2=&cmp.ic_nop;
      if (tmpil1=OptLag2(tmpi))
      {
        if (tmpil2=OptLag2(tmpil1))
        {
          if (!(tmpil3=OptLag2(tmpil2)))
            tmpil3=&cmp.ic_nop;
        }
        else
          tmpil2=tmpil3=&cmp.ic_nop;
      }
      else
        tmpil1=tmpil2=tmpil3=&cmp.ic_nop;
      switch [intermediate_code_table[code].arg_cnt]
      {
      case IS_V_ARG:
        ps->ptr-=tmpi->ic_data>>3;
        break;
      case IS_2_ARG:
        tmpi2=PrsPop(ps);
        tmpc2=tmpi2->ic_class;
      case IS_1_ARG:
        tmpi1=PrsPop(ps);
        tmpc1=tmpi1->ic_class;
        break;
      case IS_0_ARG: //nobound switch
        break;
      }
      switch (code)
      {
      case IC_IMM_I64:
      case IC_TYPE:
        tmpi->arg1.type=MDF_IMM+RT_I64;
        tmpi->arg1.disp=tmpi->ic_data;
        tmpi->ic_code=IC_MOV;
        break;
      case IC_IMM_F64:
        tmpi->arg1.type=MDF_IMM+RT_I64;
        tmpi->arg1.disp=tmpi->ic_data;
        tmpi->arg1_type_pointed_to=RT_F64;
        tmpi->ic_code=IC_MOV;
        break;
      case IC_MOV:
        if (tmpi->arg1.type&MDF_DISP && tmpi->arg1.reg==REG_RBP)
        {
          i=CmpOffset2Reg(tmpi->arg1.disp,reg_offsets);
          if (i>=0)
          {
            tmpi->arg1.type=MDF_REG+tmpi->arg1.type.raw_type;
            tmpi->arg1.reg=i;
            tmpi->arg1.disp=0;
          }
        }
        break;
      case IC_DEREF:
        if (tmpi1->ic_code==IC_LEA)
        {
          if (tmpi1->arg1.type&MDF_DISP && tmpi1->arg1.reg==REG_RBP)
          {
            i=CmpOffset2Reg(tmpi1->arg1.disp,reg_offsets);
            if (i>=0)
            {
              tmpi->ic_flags|=tmpi1->ic_flags;
              tmpi->ic_code=IC_REG;
              tmpi->arg1.type=MDF_REG+tmpi->arg1.type.raw_type;
              tmpi->arg1.reg=i;
              tmpi->arg1.disp=0;
              OptFree(tmpi1);
            }
          }
        }
        else if ((tmpi1->ic_code==IC_ABS_ADDR ||
                tmpi1->ic_code==IC_MOV &&
                tmpi1->arg1.type==MDF_IMM+RT_I64 &&
                0<=tmpi1->arg1.disp<=I32_MAX)&& !(tmpi1->ic_flags&ICF_NO_RIP))
        {
          if (tmpi1->ic_code==IC_ABS_ADDR)
            tmpi->arg1.disp=tmpi1->ic_data;
          else
            tmpi->arg1.disp=tmpi1->arg1.disp;
          tmpi->ic_flags|=tmpi1->ic_flags;
          tmpi->ic_code=IC_MOV;
          tmpi->arg1.type=MDF_RIP_DISP32+tmpi->arg1_type_pointed_to;
          tmpi->arg1.reg=REG_RIP;
          OptFree(tmpi1);
        }
        break;
      case IC_BR_MM_ZERO:
      case IC_BR_MM_NOT_ZERO:
//(branch ++ to zero is unlikely)
      case IC_DEREF_PP:
      case IC_DEREF_MM:
      case IC__PP:
      case IC__MM:
      case IC_PP_:
      case IC_MM_:
        if (tmpi1->ic_code==IC_LEA)
        {
          if (tmpi1->arg1.type&MDF_DISP && tmpi1->arg1.reg==REG_RBP)
          {
            i=CmpOffset2Reg(tmpi1->arg1.disp,reg_offsets);
            if (i>=0)
            {
              tmpi->ic_flags|=tmpi1->ic_flags;
              tmpi->arg1.type=MDF_REG+tmpi->arg1.type.raw_type;
              tmpi->arg1.reg=i;
              tmpi->arg1.disp=0;
              tmpi->ic_flags|=ICF_BY_VAL;
              OptSetNOP2(tmpi1);
            }
            else
              goto p4_lea_gone;
          }
          else
          {
p4_lea_gone:
            tmpi->ic_flags|=tmpi1->ic_flags;
            tmpi->arg1.type=tmpi1->arg1.type;
            tmpi->arg1.reg=tmpi1->arg1.reg;
            tmpi->arg1.disp=tmpi1->arg1.disp;
            tmpi->ic_flags|=ICF_BY_VAL;
            OptSetNOP2(tmpi1);
          }
        }
        else if ((tmpi1->ic_code==IC_ABS_ADDR || tmpi1->ic_code==IC_MOV &&
                tmpi1->arg1.type==MDF_IMM+RT_I64 &&
                0<=tmpi1->arg1.disp<=I32_MAX)&& !(tmpi1->ic_flags&ICF_NO_RIP))
        {
          tmpi->ic_flags|=tmpi1->ic_flags;
          if (tmpi1->ic_code==IC_ABS_ADDR)
            tmpi->arg1.disp=tmpi1->ic_data;
          else
            tmpi->arg1.disp=tmpi1->arg1.disp;
          tmpi->arg1.type=MDF_RIP_DISP32+tmpi->arg1_type_pointed_to;
          tmpi->arg1.reg=REG_RIP;
          tmpi->ic_flags|=ICF_BY_VAL;
          OptFree(tmpi1);
        }
        break;
      case IC_ADD:
        if (tmpi1->ic_code==IC_MOV && tmpi1->arg1.type==MDF_REG+RT_I64 ||
            tmpi1->ic_code==IC_REG)
        {
          if (tmpi2->ic_code==IC_MOV && tmpi2->arg1.type==MDF_REG+RT_I64 ||
              tmpi2->ic_code==IC_REG)
          {
            if (tmpi2->arg1.reg!=REG_RSP)
            {
              tmpi->arg1.disp=0;
              tmpi->arg1.reg=tmpi1->arg1.reg+tmpi2->arg1.reg<<8;
              goto p4_sib;
            }
            else if (tmpi1->arg1.reg!=REG_RSP)
            {
              tmpi->arg1.disp=0;
              tmpi->arg1.reg=tmpi2->arg1.reg+tmpi1->arg1.reg<<8;
p4_sib:
              tmpi->ic_flags|=(tmpi1->ic_flags|tmpi2->ic_flags)
                  &ICG_NO_CVT_MASK;
              OptSetNOP2(tmpi1);
              OptFree(tmpi2);
              tmpi->ic_code=IC_LEA;
              tmpi->arg1.type=MDF_SIB+RT_I64;
              tmpi->arg1_type_pointed_to=RT_I64;
              tmpi->arg2.type=MDF_NULL+tmpi->arg2.type.raw_type;
            }
          }
          else if (tmpi2->ic_code==IC_SHL_CONST &&
              tmpi2->arg1.type==MDF_REG+RT_I64 && tmpi2->ic_data<=3)
          {
            if (tmpi2->arg1.reg!=REG_RSP)
            {
              tmpi->arg1.disp=0;
              tmpi->arg1.reg=tmpi1->arg1.reg+tmpi2->arg1.reg<<8;
              if (tmpi2->ic_data==1)
                tmpi->arg1.reg|=0x4000;
              else if (tmpi2->ic_data==2)
                tmpi->arg1.reg|=0x8000;
              else
                tmpi->arg1.reg|=0xC000;
              goto p4_sib;
            }
          }
        }
        else if (tmpi1->ic_code==IC_LEA &&
            tmpi1->arg1.type&MDF_DISP)
        {
          if (tmpi1->arg1.reg==REG_RBP &&
              CmpOffset2Reg(tmpi1->arg1.disp,reg_offsets)>=0)
            break;
          if (tmpi2->ic_code==IC_MOV && tmpi2->arg1.type==MDF_REG+RT_I64 ||
              tmpi2->ic_code==IC_REG)
          {
            if (tmpi2->arg1.reg!=REG_RSP)
            {
              tmpi->arg1.disp=tmpi1->arg1.disp;
              tmpi->arg1.reg=tmpi1->arg1.reg+tmpi2->arg1.reg<<8;
              goto p4_sib;
            }
            else if (tmpi1->arg1.reg!=REG_RSP)
            {
              tmpi->arg1.disp=tmpi1->arg1.disp;
              tmpi->arg1.reg=tmpi2->arg1.reg+tmpi1->arg1.reg<<8;
              goto p4_sib;
            }
          }
          else if (tmpi2->ic_code==IC_SHL_CONST &&
              tmpi2->arg1.type==MDF_REG+RT_I64 && tmpi2->ic_data<=3)
          {
            if (tmpi2->arg1.reg!=REG_RSP)
            {
              tmpi->arg1.disp=tmpi1->arg1.disp;
              tmpi->arg1.reg=tmpi1->arg1.reg+tmpi2->arg1.reg<<8;
              if (tmpi2->ic_data==1)
                tmpi->arg1.reg|=0x4000;
              else if (tmpi2->ic_data==2)
                tmpi->arg1.reg|=0x8000;
              else
                tmpi->arg1.reg|=0xC000;
              goto p4_sib;
            }
          }
        }
        break;
      case IC_ASSIGN_PP:
      case IC_ASSIGN_MM:
//this val was stashed during pass012 for pointer arithmetic
        tmpi->ic_class2=tmpi->t.class2; //See ic_class2
      case IC_ASSIGN:
      case IC_SHL_EQU:
      case IC_SHR_EQU:
      case IC_MUL_EQU:
      case IC_DIV_EQU:
      case IC_MOD_EQU:
      case IC_AND_EQU:
      case IC_OR_EQU:
      case IC_XOR_EQU:
      case IC_ADD_EQU:
      case IC_SUB_EQU:
        if (tmpi1->ic_code==IC_LEA)
        {
          if (tmpi1->arg1.type&(MDF_DISP|MDF_SIB))
          {
            tmpi2=tmpi->next;
            if (tmpi1->arg1.type&MDF_DISP && tmpi1->arg1.reg==REG_RBP)
            {
              i=CmpOffset2Reg(tmpi1->arg1.disp,reg_offsets);
              if (i>=0)
              {
                tmpi->ic_flags|=tmpi1->ic_flags;
                tmpi->arg1.type=MDF_REG+tmpi->arg1.type.raw_type;
                tmpi->arg1.reg=i;
                tmpi->arg1.disp=0;
                OptSetNOP2(tmpi1);
              }
              else
              {
                tmpi->ic_flags|=tmpi1->ic_flags;
                tmpi->arg1.type=MDF_DISP+tmpi->arg1.type.raw_type;
                tmpi->arg1.reg=REG_RBP;
                tmpi->arg1.disp=tmpi1->arg1.disp;
                OptSetNOP2(tmpi1);
              }
            }
            else
            {
              tmpi->ic_flags|=tmpi1->ic_flags;
              tmpi->arg1.type=tmpi1->arg1.type&MDG_MASK+
                  tmpi->arg1.type.raw_type;
              tmpi->arg1.reg=tmpi1->arg1.reg;
              tmpi->arg1.disp=tmpi1->arg1.disp;
              OptSetNOP2(tmpi1);
            }
            if (tmpi->res.type&MDF_STK && tmpi2->arg2.type&MDF_STK &&
                code!=IC_ASSIGN_PP && code!=IC_ASSIGN_MM)
            {
              tmpi->res.type=tmpi->arg1.type;
              tmpi->res.reg=tmpi->arg1.reg;
              tmpi->res.disp=tmpi->arg1.disp;
              tmpi2->arg2.type=tmpi->arg1.type;
              tmpi2->arg2.reg=tmpi->arg1.reg;
              tmpi2->arg2.disp=tmpi->arg1.disp;
              CmpMinTypePointed(tmpi2,tmpi->arg1_type_pointed_to);
            }
            tmpi->ic_flags|=ICF_BY_VAL;
          }
        }
        else if ((tmpi1->ic_code==IC_ABS_ADDR ||
                tmpi1->ic_code==IC_MOV && tmpi1->arg1.type==MDF_IMM+RT_I64 &&
                0<=tmpi1->arg1.disp<=I32_MAX)&& !(tmpi1->ic_flags&ICF_NO_RIP))
        {
          tmpi->ic_flags|=tmpi1->ic_flags;
          if (tmpi1->ic_code==IC_ABS_ADDR)
            tmpi->arg1.disp=tmpi1->ic_data;
          else
            tmpi->arg1.disp=tmpi1->arg1.disp;
          tmpi->arg1.type=MDF_RIP_DISP32+tmpi->arg1.type.raw_type;
          tmpi->arg1.reg=REG_RIP;
          tmpi->ic_flags|=ICF_BY_VAL;
          OptSetNOP2(tmpi1);
        }
        break;
      case IC_RETURN_VAL:
      case IC_RETURN_VAL2:
        if (!tmpi->ic_class)
        {
          if (_type)
          {
            tmpil1=tmpi;
            while (tmpil1=OptLag1(tmpil1))
              if (tmpil1->ic_class)
              {
                if (tmpil1->ic_flags & ICF_RES_TO_F64)
                  *_type=RT_F64;
                else if (tmpil1->ic_flags & ICF_RES_TO_INT)
                  *_type=RT_I64;
                else
                  *_type=tmpil1->ic_class->raw_type;
                break;
              }
          }
          tmpi->ic_class=cmp.internal_types[RT_I64];
        }
        else if (_type)
          *_type=tmpi->ic_class->raw_type;
        break;
      case IC_NOP1:
        tmpi=OptFree(tmpi);
        break;
      case IC_BR_BT:
      case IC_BR_BTS:
      case IC_BR_BTR:
      case IC_BR_BTC:
      case IC_BR_NOT_BT:
      case IC_BR_NOT_BTS:
      case IC_BR_NOT_BTR:
      case IC_BR_NOT_BTC:
      case IC_BT:
      case IC_BTS:
      case IC_BTR:
      case IC_BTC:
      case IC_LBTS:
      case IC_LBTR:
      case IC_LBTC:
        if (!(tmpi->ic_flags&ICF_BY_VAL))
        {
          if (tmpi2->ic_code==IC_ADDR)
          {
            if (tmpi2->arg1.type&MDF_STK &&
                tmpi2->res.type&MDF_STK)
            {
              if (tmpil2=OptLag1(tmpi2))
              {
                if (tmpil2->ic_code==IC_LEA)
                {
                  if (tmpil2->arg1.type&(MDF_IMM|MDG_REG_DISP_SIB_RIP))
                  {
                    if (tmpi2)
                    {
                      tmpi->ic_flags|=tmpi2->ic_flags;
                      OptFree(tmpi2);
                    }
                    tmpi->ic_flags|=tmpil2->ic_flags|ICF_BY_VAL;
                    tmpi->arg2.type=tmpil2->arg1.type;
                    tmpi->arg2.reg =tmpil2->arg1.reg;
                    tmpi->arg2.disp=tmpil2->arg1.disp;
                    OptFree(tmpil2);
                  }
                  break;
                }
                else if (tmpil2->ic_code!=IC_ABS_ADDR &&
                    !(tmpil2->ic_code==IC_MOV &&
                        tmpil2->arg1.type==MDF_IMM+RT_I64 &&
                        0<=tmpil2->arg1.disp<=I32_MAX) ||
                    tmpil2->ic_flags&ICF_NO_RIP)
                  tmpil2=NULL;
                else
                {
                  if (tmpil2->ic_code==IC_ABS_ADDR)
                    tmpi->arg2.disp=tmpil2->ic_data;
                  else
                    tmpi->arg2.disp=tmpil2->arg1.disp;
                }
              }
            }
            else
            {
              if (tmpi2->arg1.type==MDF_IMM+RT_I64 &&
                  0<=tmpi2->arg1.disp<=I32_MAX &&
                  !(tmpi2->ic_flags&ICF_NO_RIP))
              {
                tmpil2=tmpi2;
                tmpi2=NULL;
                tmpi->arg2.disp=tmpil2->arg1.disp;
              }
              else
                tmpil2=NULL;
            }
            if (tmpil2)
            {
              if (tmpi2)
              {
                tmpi->ic_flags|=tmpi2->ic_flags;
                OptFree(tmpi2);
              }
              tmpi->ic_flags|=tmpil2->ic_flags|ICF_BY_VAL;
              tmpi->arg2.type=MDF_RIP_DISP32+tmpi->arg2.type.raw_type;
              tmpi->arg2.reg=REG_RIP;
              OptFree(tmpil2);
            }
          }
          else if (tmpi2->ic_code==IC_MOV && tmpi2->res.type&MDF_STK &&
              tmpi2->arg1.type==MDF_IMM+RT_I64 &&
              0<=tmpi2->arg1.disp<=I32_MAX &&
              !(tmpi2->ic_flags&ICF_NO_RIP))
          {
            tmpi->arg2.disp=tmpi2->arg1.disp;
            tmpi->ic_flags|=tmpi2->ic_flags|ICF_BY_VAL;
            tmpi->arg2.type=MDF_RIP_DISP32+tmpi->arg2.type.raw_type;
            tmpi->arg2.reg=REG_RIP;
            OptFree(tmpi2);
          }
        }
        break;
      case IC_BR_EQU_EQU ...IC_BR_LESS_EQU:
      case IC_BR_EQU_EQU2...IC_BR_LESS_EQU2:
      case IC_BR_CARRY:
      case IC_BR_NOT_CARRY:
      case IC_BR_ZERO:
      case IC_BR_NOT_ZERO:
        lb=tmpi->ic_data;
        if (tmpi->ic_flags&ICF_PUSH_CMP)
        {
          lb->flags|=CMF_POP_CMP;
          lb->fwd=NULL;
        }
        break;
      case IC_LABEL:
        lb=tmpi->ic_data;
        if (lb->use_cnt)
          dead_code=FALSE;
        break;
      case IC_JMP:
      case IC_RET:
        dead_code=TRUE;
        break;
      case IC_NOP2:
        ps->ptr+=tmpi->ic_data;
        break;
      case IC_CALL_END:
      case IC_END_EXP:
        if (!(tmpil1->ic_flags&ICF_PUSH_RES))
        {
          if (tmpi->ic_flags&ICF_RES_NOT_USED)
          {
            tmpil1->ic_flags|=ICF_RES_NOT_USED;
            tmpil1->res.type=MDF_NULL+tmpil1->res.type.raw_type;
          }
          else if (tmpi->arg1.type&MDF_STK &&
              tmpil1->res.type&MDF_STK)
          {
            tmpi->arg1.type=MDF_REG+tmpi->arg1.type.raw_type;
            tmpi->arg1.disp=0;
            tmpil1->res.type=MDF_REG+tmpil1->res.type.raw_type;
            tmpil1->res.disp=0;
            if (intermediate_code_table[tmpi->ic_code].arg_cnt==IS_2_ARG)
            {
              tmpi->arg1.reg=REG_R8;
              tmpil1->res.reg=REG_R8;
            }
            else
            {
              tmpi->arg1.reg=REG_RAX;
              tmpil1->res.reg=REG_RAX;
            }
          }
        }
        break;
      default:
        break;
      }
      if (tmpi)
      {
        while (OptIC4(tmpi));
        code=tmpi->ic_code;
        if (intermediate_code_table[code].res_cnt)
          PrsPush(ps,tmpi);
      }
    }
    tmpi=tmpi_next;
  }
  if (ps->ptr>2)
  {
    "Pass:%d Stk:%08X\n",cc->pass,ps->ptr;
    LexExcept(cc,"Compiler Optimization Error at ");
  }
}