lib/Target/Alpha/AlphaISelDAGToDAG.cpp

   1 //===-- AlphaISelDAGToDAG.cpp - Alpha pattern matching inst selector ------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file was developed by Andrew Lenharth and is distributed under
   6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file defines a pattern matching instruction selector for Alpha,
  11 // converting from a legalized dag to a Alpha dag.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "Alpha.h"
  16 #include "AlphaTargetMachine.h"
  17 #include "AlphaISelLowering.h"
  18 #include "llvm/CodeGen/MachineInstrBuilder.h"
  19 #include "llvm/CodeGen/MachineFrameInfo.h"
  20 #include "llvm/CodeGen/MachineFunction.h"
  21 #include "llvm/CodeGen/SSARegMap.h"
  22 #include "llvm/CodeGen/SelectionDAG.h"
  23 #include "llvm/CodeGen/SelectionDAGISel.h"
  24 #include "llvm/Target/TargetOptions.h"
  25 #include "llvm/ADT/Statistic.h"
  26 #include "llvm/Constants.h"
  27 #include "llvm/GlobalValue.h"
  28 #include "llvm/Support/Debug.h"
  29 #include "llvm/Support/MathExtras.h"
  30 #include <algorithm>
  31 using namespace llvm;
  32
  33 namespace {
  34
  35   //===--------------------------------------------------------------------===//
  36   /// AlphaDAGToDAGISel - Alpha specific code to select Alpha machine
  37   /// instructions for SelectionDAG operations.
  38   ///
  39   class AlphaDAGToDAGISel : public SelectionDAGISel {
  40     AlphaTargetLowering AlphaLowering;
  41
  42     static const int IMM_LOW  = -32768;
  43     static const int IMM_HIGH = 32767;
  44     static const int IMM_MULT = 65536;
  45
  46   public:
  47     AlphaDAGToDAGISel(TargetMachine &TM)
  48       : SelectionDAGISel(AlphaLowering), AlphaLowering(TM) {}
  49
  50     /// getI64Imm - Return a target constant with the specified value, of type
  51     /// i64.
  52     inline SDOperand getI64Imm(int64_t Imm) {
  53       return CurDAG->getTargetConstant(Imm, MVT::i64);
  54     }
  55
  56     // Select - Convert the specified operand from a target-independent to a
  57     // target-specific node if it hasn't already been changed.
  58     SDOperand Select(SDOperand Op);
  59
  60     /// InstructionSelectBasicBlock - This callback is invoked by
  61     /// SelectionDAGISel when it has created a SelectionDAG for us to codegen.
  62     virtual void InstructionSelectBasicBlock(SelectionDAG &DAG);
  63
  64     virtual const char *getPassName() const {
  65       return "Alpha DAG->DAG Pattern Instruction Selection";
  66     }
  67
  68 // Include the pieces autogenerated from the target description.
  69 #include "AlphaGenDAGISel.inc"
  70
  71 private:
  72     SDOperand getGlobalBaseReg();
  73     SDOperand getRASaveReg();
  74     SDOperand SelectCALL(SDOperand Op);
  75
  76   };
  77 }
  78
  79 /// getGlobalBaseReg - Output the instructions required to put the
  80 /// GOT address into a register.
  81 ///
  82 SDOperand AlphaDAGToDAGISel::getGlobalBaseReg() {
  83   return CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
  84                                 AlphaLowering.getVRegGP(),
  85                                 MVT::i64);
  86 }
  87
  88 /// getRASaveReg - Grab the return address
  89 ///
  90 SDOperand AlphaDAGToDAGISel::getRASaveReg() {
  91   return CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
  92                                 AlphaLowering.getVRegRA(),
  93                                 MVT::i64);
  94 }
  95
  96 /// InstructionSelectBasicBlock - This callback is invoked by
  97 /// SelectionDAGISel when it has created a SelectionDAG for us to codegen.
  98 void AlphaDAGToDAGISel::InstructionSelectBasicBlock(SelectionDAG &DAG) {
  99   DEBUG(BB->dump());
 100
 101   // Select target instructions for the DAG.
 102   DAG.setRoot(Select(DAG.getRoot()));
 103   CodeGenMap.clear();
 104   DAG.RemoveDeadNodes();
 105
 106   // Emit machine code to BB.
 107   ScheduleAndEmitDAG(DAG);
 108 }
 109
 110 // Select - Convert the specified operand from a target-independent to a
 111 // target-specific node if it hasn't already been changed.
 112 SDOperand AlphaDAGToDAGISel::Select(SDOperand Op) {
 113   SDNode *N = Op.Val;
 114   if (N->getOpcode() >= ISD::BUILTIN_OP_END &&
 115       N->getOpcode() < AlphaISD::FIRST_NUMBER)
 116     return Op;   // Already selected.
 117
 118   // If this has already been converted, use it.
 119   std::map<SDOperand, SDOperand>::iterator CGMI = CodeGenMap.find(Op);
 120   if (CGMI != CodeGenMap.end()) return CGMI->second;
 121
 122   switch (N->getOpcode()) {
 123   default: break;
 124   case ISD::TAILCALL:
 125   case ISD::CALL: return SelectCALL(Op);
 126
 127   case ISD::DYNAMIC_STACKALLOC: {
 128     if (!isa<ConstantSDNode>(N->getOperand(2)) ||
 129         cast<ConstantSDNode>(N->getOperand(2))->getValue() != 0) {
 130       std::cerr << "Cannot allocate stack object with greater alignment than"
 131                 << " the stack alignment yet!";
 132       abort();
 133     }
 134
 135     SDOperand Chain = Select(N->getOperand(0));
 136     SDOperand Amt   = Select(N->getOperand(1));
 137     SDOperand Reg = CurDAG->getRegister(Alpha::R30, MVT::i64);
 138     SDOperand Val = CurDAG->getCopyFromReg(Chain, Alpha::R30, MVT::i64);
 139     Chain = Val.getValue(1);
 140
 141     // Subtract the amount (guaranteed to be a multiple of the stack alignment)
 142     // from the stack pointer, giving us the result pointer.
 143     SDOperand Result = CurDAG->getTargetNode(Alpha::SUBQ, MVT::i64, Val, Amt);
 144
 145     // Copy this result back into R30.
 146     Chain = CurDAG->getNode(ISD::CopyToReg, MVT::Other, Chain, Reg, Result);
 147
 148     // Copy this result back out of R30 to make sure we're not using the stack
 149     // space without decrementing the stack pointer.
 150     Result = CurDAG->getCopyFromReg(Chain, Alpha::R30, MVT::i64);
 151
 152     // Finally, replace the DYNAMIC_STACKALLOC with the copyfromreg.
 153     CodeGenMap[Op.getValue(0)] = Result;
 154     CodeGenMap[Op.getValue(1)] = Result.getValue(1);
 155     return SDOperand(Result.Val, Op.ResNo);
 156   }
 157   case ISD::BRCOND: {
 158     if (N->getOperand(1).getOpcode() == ISD::SETCC &&
 159         MVT::isFloatingPoint(N->getOperand(1).getOperand(0).getValueType())) {
 160       SDOperand Chain = Select(N->getOperand(0));
 161       SDOperand CC1 = Select(N->getOperand(1).getOperand(0));
 162       SDOperand CC2 = Select(N->getOperand(1).getOperand(1));
 163       ISD::CondCode cCode= cast<CondCodeSDNode>(N->getOperand(1).getOperand(2))->get();
 164
 165       bool rev = false;
 166       bool isNE = false;
 167       unsigned Opc = Alpha::WTF;
 168       switch(cCode) {
 169       default: N->dump(); assert(0 && "Unknown FP comparison!");
 170       case ISD::SETEQ: Opc = Alpha::CMPTEQ; break;
 171       case ISD::SETLT: Opc = Alpha::CMPTLT; break;
 172       case ISD::SETLE: Opc = Alpha::CMPTLE; break;
 173       case ISD::SETGT: Opc = Alpha::CMPTLT; rev = true; break;
 174       case ISD::SETGE: Opc = Alpha::CMPTLE; rev = true; break;
 175       case ISD::SETNE: Opc = Alpha::CMPTEQ; isNE = true; break;
 176       };
 177       SDOperand cmp = CurDAG->getTargetNode(Opc, MVT::f64,
 178                                             rev?CC2:CC1,
 179                                             rev?CC1:CC2);
 180
 181       MachineBasicBlock *Dest =
 182         cast<BasicBlockSDNode>(N->getOperand(2))->getBasicBlock();
 183       if(isNE)
 184         return CurDAG->SelectNodeTo(N, Alpha::FBEQ, MVT::Other, cmp,
 185                                     CurDAG->getBasicBlock(Dest), Chain);
 186       else
 187         return CurDAG->SelectNodeTo(N, Alpha::FBNE, MVT::Other, cmp,
 188                                     CurDAG->getBasicBlock(Dest), Chain);
 189     }
 190     SDOperand Chain = Select(N->getOperand(0));
 191     SDOperand CC = Select(N->getOperand(1));
 192     MachineBasicBlock *Dest =
 193       cast<BasicBlockSDNode>(N->getOperand(2))->getBasicBlock();
 194     return CurDAG->SelectNodeTo(N, Alpha::BNE, MVT::Other, CC,
 195                                 CurDAG->getBasicBlock(Dest), Chain);
 196   }
 197   case ISD::LOAD:
 198   case ISD::EXTLOAD:
 199   case ISD::ZEXTLOAD:
 200   case ISD::SEXTLOAD: {
 201     SDOperand Chain = Select(N->getOperand(0));
 202     SDOperand Address = Select(N->getOperand(1));
 203     unsigned opcode = N->getOpcode();
 204     unsigned Opc = Alpha::WTF;
 205     if (opcode == ISD::LOAD)
 206       switch (N->getValueType(0)) {
 207       default: N->dump(); assert(0 && "Bad load!");
 208       case MVT::i64: Opc = Alpha::LDQ; break;
 209       case MVT::f64: Opc = Alpha::LDT; break;
 210       case MVT::f32: Opc = Alpha::LDS; break;
 211       }
 212     else
 213       switch (cast<VTSDNode>(N->getOperand(3))->getVT()) {
 214       default: N->dump(); assert(0 && "Bad sign extend!");
 215       case MVT::i32: Opc = Alpha::LDL;
 216         assert(opcode != ISD::ZEXTLOAD && "Not sext"); break;
 217       case MVT::i16: Opc = Alpha::LDWU;
 218         assert(opcode != ISD::SEXTLOAD && "Not zext"); break;
 219       case MVT::i1: //FIXME: Treat i1 as i8 since there are problems otherwise
 220       case MVT::i8: Opc = Alpha::LDBU;
 221           assert(opcode != ISD::SEXTLOAD && "Not zext"); break;
 222       }
 223
 224     return CurDAG->SelectNodeTo(N, Opc, N->getValueType(0), MVT::Other,
 225                                 getI64Imm(0), Address,
 226                                 Chain).getValue(Op.ResNo);
 227   }
 228   case ISD::STORE:
 229   case ISD::TRUNCSTORE: {
 230     SDOperand Chain = Select(N->getOperand(0));
 231     SDOperand Value = Select(N->getOperand(1));
 232     SDOperand Address = Select(N->getOperand(2));
 233
 234     unsigned Opc = Alpha::WTF;
 235
 236     if (N->getOpcode() == ISD::STORE) {
 237       switch (N->getOperand(1).getValueType()) {
 238       case MVT::i64: Opc = Alpha::STQ; break;
 239       case MVT::f64: Opc = Alpha::STT; break;
 240       case MVT::f32: Opc = Alpha::STS; break;
 241       default: assert(0 && "Bad store!");
 242       };
 243     } else { //TRUNCSTORE
 244       switch (cast<VTSDNode>(N->getOperand(4))->getVT()) {
 245       case MVT::i32: Opc = Alpha::STL; break;
 246       case MVT::i16: Opc = Alpha::STW; break;
 247       case MVT::i8: Opc = Alpha::STB; break;
 248       default: assert(0 && "Bad truncstore!");
 249       };
 250     }
 251     return CurDAG->SelectNodeTo(N, Opc, MVT::Other, Value, getI64Imm(0),
 252                                 Address, Chain);
 253   }
 254
 255   case ISD::BR:
 256     return CurDAG->SelectNodeTo(N, Alpha::BR_DAG, MVT::Other, N->getOperand(1),
 257                                 Select(N->getOperand(0)));
 258   case ISD::FrameIndex: {
 259     int FI = cast<FrameIndexSDNode>(N)->getIndex();
 260     return CurDAG->SelectNodeTo(N, Alpha::LDA, MVT::i64,
 261                                 CurDAG->getTargetFrameIndex(FI, MVT::i32),
 262                                 getI64Imm(0));
 263   }
 264   case ISD::ConstantPool: {
 265     Constant *C = cast<ConstantPoolSDNode>(N)->get();
 266     SDOperand Tmp, CPI = CurDAG->getTargetConstantPool(C, MVT::i64);
 267     Tmp = CurDAG->getTargetNode(Alpha::LDAHr, MVT::i64, CPI, getGlobalBaseReg());
 268     return CurDAG->SelectNodeTo(N, Alpha::LDAr, MVT::i64, CPI, Tmp);
 269   }
 270   case ISD::GlobalAddress: {
 271     GlobalValue *GV = cast<GlobalAddressSDNode>(N)->getGlobal();
 272     SDOperand GA = CurDAG->getTargetGlobalAddress(GV, MVT::i64);
 273     return CurDAG->SelectNodeTo(N, Alpha::LDQl, MVT::i64, GA,
 274                                 getGlobalBaseReg());
 275   }
 276   case ISD::ExternalSymbol:
 277     return CurDAG->SelectNodeTo(N, Alpha::LDQl, MVT::i64,
 278                                 CurDAG->getTargetExternalSymbol(cast<ExternalSymbolSDNode>(N)->getSymbol(), MVT::i64),
 279                                 getGlobalBaseReg());
 280
 281   case ISD::RET: {
 282     SDOperand Chain = Select(N->getOperand(0));     // Token chain.
 283     SDOperand InFlag;
 284
 285     if (N->getNumOperands() == 2) {
 286       SDOperand Val = Select(N->getOperand(1));
 287       if (N->getOperand(1).getValueType() == MVT::i64) {
 288         Chain = CurDAG->getCopyToReg(Chain, Alpha::R0, Val, InFlag);
 289         InFlag = Chain.getValue(1);
 290       }
 291     }
 292     Chain = CurDAG->getCopyToReg(Chain, Alpha::R26, getRASaveReg(), InFlag);
 293     InFlag = Chain.getValue(1);
 294
 295     // Finally, select this to a ret instruction.
 296     return CurDAG->SelectNodeTo(N, Alpha::RETDAG, MVT::Other, Chain, InFlag);
 297   }
 298   case ISD::Constant: {
 299     int64_t val = (int64_t)cast<ConstantSDNode>(N)->getValue();
 300     if (val > (int64_t)IMM_HIGH +(int64_t)IMM_HIGH* (int64_t)IMM_MULT ||
 301         val < (int64_t)IMM_LOW + (int64_t)IMM_LOW * (int64_t)IMM_MULT) {
 302       MachineConstantPool *CP = BB->getParent()->getConstantPool();
 303       ConstantUInt *C =
 304         ConstantUInt::get(Type::getPrimitiveType(Type::ULongTyID) , val);
 305       SDOperand Tmp, CPI = CurDAG->getTargetConstantPool(C, MVT::i64);
 306       Tmp = CurDAG->getTargetNode(Alpha::LDAHr, MVT::i64, CPI, getGlobalBaseReg());
 307       return CurDAG->SelectNodeTo(N, Alpha::LDQr, MVT::i64, CPI, Tmp);
 308     }
 309     break;
 310   }
 311   case ISD::ConstantFP:
 312     if (ConstantFPSDNode *CN = dyn_cast<ConstantFPSDNode>(N)) {
 313       bool isDouble = N->getValueType(0) == MVT::f64;
 314       MVT::ValueType T = isDouble ? MVT::f64 : MVT::f32;
 315       if (CN->isExactlyValue(+0.0)) {
 316         return CurDAG->SelectNodeTo(N, isDouble ? Alpha::CPYST : Alpha::CPYSS,
 317                                     T, CurDAG->getRegister(Alpha::F31, T),
 318                                     CurDAG->getRegister(Alpha::F31, T));
 319       } else if ( CN->isExactlyValue(-0.0)) {
 320         return CurDAG->SelectNodeTo(N, isDouble ? Alpha::CPYSNT : Alpha::CPYSNS,
 321                                     T, CurDAG->getRegister(Alpha::F31, T),
 322                                     CurDAG->getRegister(Alpha::F31, T));
 323       } else {
 324         abort();
 325       }
 326       break;
 327     }
 328   case ISD::SDIV:
 329   case ISD::UDIV:
 330   case ISD::UREM:
 331   case ISD::SREM:
 332     if (MVT::isInteger(N->getValueType(0))) {
 333       const char* opstr = 0;
 334       switch(N->getOpcode()) {
 335       case ISD::UREM: opstr = "__remqu"; break;
 336       case ISD::SREM: opstr = "__remq";  break;
 337       case ISD::UDIV: opstr = "__divqu"; break;
 338       case ISD::SDIV: opstr = "__divq";  break;
 339       }
 340       SDOperand Tmp1 = Select(N->getOperand(0)),
 341         Tmp2 = Select(N->getOperand(1)),
 342         Addr = Select(CurDAG->getExternalSymbol(opstr,
 343                                                 AlphaLowering.getPointerTy()));
 344       SDOperand Chain;
 345       Chain = CurDAG->getCopyToReg(CurDAG->getEntryNode(), Alpha::R24, Tmp1,
 346                                    SDOperand(0,0));
 347       Chain = CurDAG->getCopyToReg(Chain, Alpha::R25, Tmp2, Chain.getValue(1));
 348       Chain = CurDAG->getCopyToReg(Chain, Alpha::R27, Addr, Chain.getValue(1));
 349       Chain = CurDAG->getTargetNode(Alpha::JSRsDAG, MVT::Other, MVT::Flag,
 350                                     Chain, Chain.getValue(1));
 351       return CurDAG->getCopyFromReg(Chain, Alpha::R27, MVT::i64,
 352                                     Chain.getValue(1));
 353     }
 354     break;
 355
 356   case ISD::SETCC:
 357     if (MVT::isFloatingPoint(N->getOperand(0).Val->getValueType(0))) {
 358       unsigned Opc = Alpha::WTF;
 359       ISD::CondCode CC = cast<CondCodeSDNode>(N->getOperand(2))->get();
 360       bool rev = false;
 361       bool isNE = false;
 362       switch(CC) {
 363       default: N->dump(); assert(0 && "Unknown FP comparison!");
 364       case ISD::SETEQ: Opc = Alpha::CMPTEQ; break;
 365       case ISD::SETLT: Opc = Alpha::CMPTLT; break;
 366       case ISD::SETLE: Opc = Alpha::CMPTLE; break;
 367       case ISD::SETGT: Opc = Alpha::CMPTLT; rev = true; break;
 368       case ISD::SETGE: Opc = Alpha::CMPTLE; rev = true; break;
 369       case ISD::SETNE: Opc = Alpha::CMPTEQ; isNE = true; break;
 370       };
 371       SDOperand tmp1 = Select(N->getOperand(0)),
 372         tmp2 = Select(N->getOperand(1));
 373       SDOperand cmp = CurDAG->getTargetNode(Opc, MVT::f64,
 374                                             rev?tmp2:tmp1,
 375                                             rev?tmp1:tmp2);
 376       if (isNE)
 377         cmp = CurDAG->getTargetNode(Alpha::CMPTEQ, MVT::f64, cmp,
 378                                     CurDAG->getRegister(Alpha::F31, MVT::f64));
 379
 380       SDOperand LD;
 381       if (AlphaLowering.hasITOF()) {
 382         LD = CurDAG->getNode(AlphaISD::FTOIT_, MVT::i64, cmp);
 383       } else {
 384         int FrameIdx =
 385           CurDAG->getMachineFunction().getFrameInfo()->CreateStackObject(8, 8);
 386         SDOperand FI = CurDAG->getFrameIndex(FrameIdx, MVT::i64);
 387         SDOperand ST = CurDAG->getTargetNode(Alpha::STT, MVT::Other,
 388                                              cmp, FI, CurDAG->getRegister(Alpha::R31, MVT::i64));
 389         LD = CurDAG->getTargetNode(Alpha::LDQ, MVT::i64, FI,
 390                                    CurDAG->getRegister(Alpha::R31, MVT::i64),
 391                                    ST);
 392       }
 393       SDOperand FP = CurDAG->getTargetNode(Alpha::CMPULT, MVT::i64,
 394                                            CurDAG->getRegister(Alpha::R31, MVT::i64),
 395                                            LD);
 396       return FP;
 397     }
 398     break;
 399
 400   case ISD::SELECT:
 401     if (MVT::isFloatingPoint(N->getValueType(0))) {
 402       //move int to fp
 403       bool isDouble = N->getValueType(0) == MVT::f64;
 404       SDOperand LD,
 405         cond = Select(N->getOperand(0)),
 406         TV = Select(N->getOperand(1)),
 407         FV = Select(N->getOperand(2));
 408
 409       if (AlphaLowering.hasITOF()) {
 410         LD = CurDAG->getNode(AlphaISD::ITOFT_, MVT::f64, cond);
 411       } else {
 412         int FrameIdx =
 413           CurDAG->getMachineFunction().getFrameInfo()->CreateStackObject(8, 8);
 414         SDOperand FI = CurDAG->getFrameIndex(FrameIdx, MVT::i64);
 415         SDOperand ST = CurDAG->getTargetNode(Alpha::STQ, MVT::Other,
 416                                              cond, FI, CurDAG->getRegister(Alpha::R31, MVT::i64));
 417         LD = CurDAG->getTargetNode(Alpha::LDT, MVT::f64, FI,
 418                                    CurDAG->getRegister(Alpha::R31, MVT::i64),
 419                                    ST);
 420       }
 421       SDOperand FP = CurDAG->getTargetNode(isDouble?Alpha::FCMOVEQT:Alpha::FCMOVEQS,
 422                                            MVT::f64, TV, FV, LD);
 423       return FP;
 424     }
 425     break;
 426
 427   }
 428
 429   return SelectCode(Op);
 430 }
 431
 432 SDOperand AlphaDAGToDAGISel::SelectCALL(SDOperand Op) {
 433   //TODO: add flag stuff to prevent nondeturministic breakage!
 434
 435   SDNode *N = Op.Val;
 436   SDOperand Chain = Select(N->getOperand(0));
 437   SDOperand Addr = Select(N->getOperand(1));
 438   SDOperand InFlag;  // Null incoming flag value.
 439
 440    std::vector<SDOperand> CallOperands;
 441    std::vector<MVT::ValueType> TypeOperands;
 442
 443    //grab the arguments
 444    for(int i = 2, e = N->getNumOperands(); i < e; ++i) {
 445      TypeOperands.push_back(N->getOperand(i).getValueType());
 446      CallOperands.push_back(Select(N->getOperand(i)));
 447    }
 448    int count = N->getNumOperands() - 2;
 449
 450    static const unsigned args_int[] = {Alpha::R16, Alpha::R17, Alpha::R18,
 451                                        Alpha::R19, Alpha::R20, Alpha::R21};
 452    static const unsigned args_float[] = {Alpha::F16, Alpha::F17, Alpha::F18,
 453                                          Alpha::F19, Alpha::F20, Alpha::F21};
 454
 455    for (int i = 6; i < count; ++i) {
 456      unsigned Opc = Alpha::WTF;
 457      if (MVT::isInteger(TypeOperands[i])) {
 458        Opc = Alpha::STQ;
 459      } else if (TypeOperands[i] == MVT::f32) {
 460        Opc = Alpha::STS;
 461      } else if (TypeOperands[i] == MVT::f64) {
 462        Opc = Alpha::STT;
 463      } else
 464        assert(0 && "Unknown operand");
 465      Chain = CurDAG->getTargetNode(Opc, MVT::Other, CallOperands[i],
 466                                    getI64Imm((i - 6) * 8),
 467                                    CurDAG->getCopyFromReg(Chain, Alpha::R30, MVT::i64),
 468                                    Chain);
 469    }
 470    for (int i = 0; i < std::min(6, count); ++i) {
 471      if (MVT::isInteger(TypeOperands[i])) {
 472        Chain = CurDAG->getCopyToReg(Chain, args_int[i], CallOperands[i], InFlag);
 473        InFlag = Chain.getValue(1);
 474      } else if (TypeOperands[i] == MVT::f32 || TypeOperands[i] == MVT::f64) {
 475        Chain = CurDAG->getCopyToReg(Chain, args_float[i], CallOperands[i], InFlag);
 476        InFlag = Chain.getValue(1);
 477      } else
 478        assert(0 && "Unknown operand");
 479    }
 480
 481
 482    Chain = CurDAG->getCopyToReg(Chain, Alpha::R27, Addr, InFlag);
 483    InFlag = Chain.getValue(1);
 484    // Finally, once everything is in registers to pass to the call, emit the
 485    // call itself.
 486    Chain = CurDAG->getTargetNode(Alpha::JSRDAG, MVT::Other, MVT::Flag,
 487                                  Chain, InFlag );
 488    InFlag = Chain.getValue(1);
 489
 490    std::vector<SDOperand> CallResults;
 491
 492    switch (N->getValueType(0)) {
 493    default: assert(0 && "Unexpected ret value!");
 494      case MVT::Other: break;
 495    case MVT::i64:
 496      Chain = CurDAG->getCopyFromReg(Chain, Alpha::R0, MVT::i64, InFlag).getValue(1);
 497      CallResults.push_back(Chain.getValue(0));
 498      break;
 499    case MVT::f32:
 500      Chain = CurDAG->getCopyFromReg(Chain, Alpha::F0, MVT::f32, InFlag).getValue(1);
 501      CallResults.push_back(Chain.getValue(0));
 502      break;
 503    case MVT::f64:
 504      Chain = CurDAG->getCopyFromReg(Chain, Alpha::F0, MVT::f64, InFlag).getValue(1);
 505      CallResults.push_back(Chain.getValue(0));
 506      break;
 507    }
 508
 509    CallResults.push_back(Chain);
 510    for (unsigned i = 0, e = CallResults.size(); i != e; ++i)
 511      CodeGenMap[Op.getValue(i)] = CallResults[i];
 512    return CallResults[Op.ResNo];
 513 }
 514
 515
 516 /// createAlphaISelDag - This pass converts a legalized DAG into a
 517 /// Alpha-specific DAG, ready for instruction scheduling.
 518 ///
 519 FunctionPass *llvm::createAlphaISelDag(TargetMachine &TM) {
 520   return new AlphaDAGToDAGISel(TM);
 521 }