6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-07-25 13:24:46 +00:00
Code Issues Projects Releases Wiki Activity

Handle "call" operands of type long/ulong passed in registers.

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@17464 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Brian Gaeke
2004-11-04 00:27:04 +00:00
parent 38f024daea
commit 6931fd61c0
2 changed files with 22 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
lib/Target/Sparc/SparcV8ISelSimple.cpp
View File

@@ -784,12 +784,13 @@ void V8ISel::visitCallInst(CallInst &I) {
// Deal with args // Deal with args
static const unsigned OutgoingArgRegs[] = { V8::O0, V8::O1, V8::O2, V8::O3, static const unsigned OutgoingArgRegs[] = { V8::O0, V8::O1, V8::O2, V8::O3,
V8::O4, V8::O5 }; V8::O4, V8::O5 };
const unsigned *OAR = &OutgoingArgRegs[0];
for (unsigned i = 1; i < I.getNumOperands (); ++i) { for (unsigned i = 1; i < I.getNumOperands (); ++i) {
unsigned ArgReg = getReg (I.getOperand (i)); unsigned ArgReg = getReg (I.getOperand (i));
if (i < 7) { if (i < 7) {
if (getClassB (I.getOperand (i)->getType ()) < cLong) { if (getClassB (I.getOperand (i)->getType ()) < cLong) {
// Schlep it over into the incoming arg register // Schlep it over into the incoming arg register
BuildMI (BB, V8::ORrr, 2, OutgoingArgRegs[i - 1]).addReg (V8::G0) BuildMI (BB, V8::ORrr, 2, *OAR++).addReg (V8::G0)
.addReg (ArgReg); .addReg (ArgReg);
} else if (getClassB (I.getOperand (i)->getType ()) == cFloat) { } else if (getClassB (I.getOperand (i)->getType ()) == cFloat) {
// Single-fp args are passed in integer registers; go through // Single-fp args are passed in integer registers; go through
@@ -798,7 +799,7 @@ void V8ISel::visitCallInst(CallInst &I) {
int FI = F->getFrameInfo()->CreateStackObject(4, FltAlign); int FI = F->getFrameInfo()->CreateStackObject(4, FltAlign);
BuildMI (BB, V8::STFri, 3).addFrameIndex (FI).addSImm (0) BuildMI (BB, V8::STFri, 3).addFrameIndex (FI).addSImm (0)
.addReg (ArgReg); .addReg (ArgReg);
BuildMI (BB, V8::LD, 2, OutgoingArgRegs[i - 1]).addFrameIndex (FI) BuildMI (BB, V8::LD, 2, *OAR++).addFrameIndex (FI)
.addSImm (0); .addSImm (0);
} else if (getClassB (I.getOperand (i)->getType ()) == cDouble) { } else if (getClassB (I.getOperand (i)->getType ()) == cDouble) {
// Double-fp args are passed in pairs of integer registers; go through // Double-fp args are passed in pairs of integer registers; go through
@@ -808,12 +809,17 @@ void V8ISel::visitCallInst(CallInst &I) {
int FI = F->getFrameInfo()->CreateStackObject(8, DblAlign); int FI = F->getFrameInfo()->CreateStackObject(8, DblAlign);
BuildMI (BB, V8::STDFri, 3).addFrameIndex (FI).addSImm (0) BuildMI (BB, V8::STDFri, 3).addFrameIndex (FI).addSImm (0)
.addReg (ArgReg); .addReg (ArgReg);
BuildMI (BB, V8::LD, 2, OutgoingArgRegs[i - 1]).addFrameIndex (FI) BuildMI (BB, V8::LD, 2, *OAR++).addFrameIndex (FI)
.addSImm (0); .addSImm (0);
BuildMI (BB, V8::LD, 2, OutgoingArgRegs[i]).addFrameIndex (FI) BuildMI (BB, V8::LD, 2, *OAR++).addFrameIndex (FI)
.addSImm (4); .addSImm (4);
} else if (getClassB (I.getOperand (i)->getType ()) == cLong) {
BuildMI (BB, V8::ORrr, 2, *OAR++).addReg (V8::G0)
.addReg (ArgReg);
BuildMI (BB, V8::ORrr, 2, *OAR++).addReg (V8::G0)
.addReg (ArgReg+1);
} else { } else {
assert (0 && "64-bit (double, long, etc.) 'call' opnds not handled"); assert (0 && "Unknown class?!");
} }
} else { } else {
if (i == 7 && extraStack) if (i == 7 && extraStack)

16
lib/Target/SparcV8/SparcV8ISelSimple.cpp
View File

@@ -784,12 +784,13 @@ void V8ISel::visitCallInst(CallInst &I) {
// Deal with args // Deal with args
static const unsigned OutgoingArgRegs[] = { V8::O0, V8::O1, V8::O2, V8::O3, static const unsigned OutgoingArgRegs[] = { V8::O0, V8::O1, V8::O2, V8::O3,
V8::O4, V8::O5 }; V8::O4, V8::O5 };
const unsigned *OAR = &OutgoingArgRegs[0];
for (unsigned i = 1; i < I.getNumOperands (); ++i) { for (unsigned i = 1; i < I.getNumOperands (); ++i) {
unsigned ArgReg = getReg (I.getOperand (i)); unsigned ArgReg = getReg (I.getOperand (i));
if (i < 7) { if (i < 7) {
if (getClassB (I.getOperand (i)->getType ()) < cLong) { if (getClassB (I.getOperand (i)->getType ()) < cLong) {
// Schlep it over into the incoming arg register // Schlep it over into the incoming arg register
BuildMI (BB, V8::ORrr, 2, OutgoingArgRegs[i - 1]).addReg (V8::G0) BuildMI (BB, V8::ORrr, 2, *OAR++).addReg (V8::G0)
.addReg (ArgReg); .addReg (ArgReg);
} else if (getClassB (I.getOperand (i)->getType ()) == cFloat) { } else if (getClassB (I.getOperand (i)->getType ()) == cFloat) {
// Single-fp args are passed in integer registers; go through // Single-fp args are passed in integer registers; go through
@@ -798,7 +799,7 @@ void V8ISel::visitCallInst(CallInst &I) {
int FI = F->getFrameInfo()->CreateStackObject(4, FltAlign); int FI = F->getFrameInfo()->CreateStackObject(4, FltAlign);
BuildMI (BB, V8::STFri, 3).addFrameIndex (FI).addSImm (0) BuildMI (BB, V8::STFri, 3).addFrameIndex (FI).addSImm (0)
.addReg (ArgReg); .addReg (ArgReg);
BuildMI (BB, V8::LD, 2, OutgoingArgRegs[i - 1]).addFrameIndex (FI) BuildMI (BB, V8::LD, 2, *OAR++).addFrameIndex (FI)
.addSImm (0); .addSImm (0);
} else if (getClassB (I.getOperand (i)->getType ()) == cDouble) { } else if (getClassB (I.getOperand (i)->getType ()) == cDouble) {
// Double-fp args are passed in pairs of integer registers; go through // Double-fp args are passed in pairs of integer registers; go through
@@ -808,12 +809,17 @@ void V8ISel::visitCallInst(CallInst &I) {
int FI = F->getFrameInfo()->CreateStackObject(8, DblAlign); int FI = F->getFrameInfo()->CreateStackObject(8, DblAlign);
BuildMI (BB, V8::STDFri, 3).addFrameIndex (FI).addSImm (0) BuildMI (BB, V8::STDFri, 3).addFrameIndex (FI).addSImm (0)
.addReg (ArgReg); .addReg (ArgReg);
BuildMI (BB, V8::LD, 2, OutgoingArgRegs[i - 1]).addFrameIndex (FI) BuildMI (BB, V8::LD, 2, *OAR++).addFrameIndex (FI)
.addSImm (0); .addSImm (0);
BuildMI (BB, V8::LD, 2, OutgoingArgRegs[i]).addFrameIndex (FI) BuildMI (BB, V8::LD, 2, *OAR++).addFrameIndex (FI)
.addSImm (4); .addSImm (4);
} else if (getClassB (I.getOperand (i)->getType ()) == cLong) {
BuildMI (BB, V8::ORrr, 2, *OAR++).addReg (V8::G0)
.addReg (ArgReg);
BuildMI (BB, V8::ORrr, 2, *OAR++).addReg (V8::G0)
.addReg (ArgReg+1);
} else { } else {
assert (0 && "64-bit (double, long, etc.) 'call' opnds not handled"); assert (0 && "Unknown class?!");
} }
} else { } else {
if (i == 7 && extraStack) if (i == 7 && extraStack)