mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-07-18 12:29:27 +00:00
276dcbdc8d
flags. This is needed by the new legalize types infrastructure which wants to expand the 64 bit constants previously used to hold the flags on 32 bit machines. There are two functional changes: (1) in LowerArguments, if a parameter has the zext attribute set then that is marked in the flags; before it was being ignored; (2) PPC had some bogus code for handling two word arguments when using the ELF 32 ABI, which was hard to convert because of the bogusness. As suggested by the original author (Nicolas Geoffray), I've disabled it for the moment. Tested with "make check" and the Ada ACATS testsuite. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@48640 91177308-0d34-0410-b5e6-96231b3b80d8
121 lines
4.6 KiB
C++
121 lines
4.6 KiB
C++
//===-- llvm/CallingConvLower.cpp - Calling Conventions -------------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file implements the CCState class, used for lowering and implementing
|
|
// calling conventions.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "llvm/CodeGen/CallingConvLower.h"
|
|
#include "llvm/CodeGen/SelectionDAGNodes.h"
|
|
#include "llvm/Target/TargetRegisterInfo.h"
|
|
#include "llvm/Target/TargetData.h"
|
|
#include "llvm/Target/TargetMachine.h"
|
|
using namespace llvm;
|
|
|
|
CCState::CCState(unsigned CC, bool isVarArg, const TargetMachine &tm,
|
|
SmallVector<CCValAssign, 16> &locs)
|
|
: CallingConv(CC), IsVarArg(isVarArg), TM(tm),
|
|
TRI(*TM.getRegisterInfo()), Locs(locs) {
|
|
// No stack is used.
|
|
StackOffset = 0;
|
|
|
|
UsedRegs.resize(TRI.getNumRegs());
|
|
}
|
|
|
|
// HandleByVal - Allocate a stack slot large enough to pass an argument by
|
|
// value. The size and alignment information of the argument is encoded in its
|
|
// parameter attribute.
|
|
void CCState::HandleByVal(unsigned ValNo, MVT::ValueType ValVT,
|
|
MVT::ValueType LocVT, CCValAssign::LocInfo LocInfo,
|
|
int MinSize, int MinAlign,
|
|
ISD::ArgFlagsTy ArgFlags) {
|
|
unsigned Align = ArgFlags.getByValAlign();
|
|
unsigned Size = ArgFlags.getByValSize();
|
|
if (MinSize > (int)Size)
|
|
Size = MinSize;
|
|
if (MinAlign > (int)Align)
|
|
Align = MinAlign;
|
|
unsigned Offset = AllocateStack(Size, Align);
|
|
|
|
addLoc(CCValAssign::getMem(ValNo, ValVT, Offset, LocVT, LocInfo));
|
|
}
|
|
|
|
/// MarkAllocated - Mark a register and all of its aliases as allocated.
|
|
void CCState::MarkAllocated(unsigned Reg) {
|
|
UsedRegs[Reg/32] |= 1 << (Reg&31);
|
|
|
|
if (const unsigned *RegAliases = TRI.getAliasSet(Reg))
|
|
for (; (Reg = *RegAliases); ++RegAliases)
|
|
UsedRegs[Reg/32] |= 1 << (Reg&31);
|
|
}
|
|
|
|
/// AnalyzeFormalArguments - Analyze an ISD::FORMAL_ARGUMENTS node,
|
|
/// incorporating info about the formals into this state.
|
|
void CCState::AnalyzeFormalArguments(SDNode *TheArgs, CCAssignFn Fn) {
|
|
unsigned NumArgs = TheArgs->getNumValues()-1;
|
|
|
|
for (unsigned i = 0; i != NumArgs; ++i) {
|
|
MVT::ValueType ArgVT = TheArgs->getValueType(i);
|
|
ISD::ArgFlagsTy ArgFlags =
|
|
cast<ARG_FLAGSSDNode>(TheArgs->getOperand(3+i))->getArgFlags();
|
|
if (Fn(i, ArgVT, ArgVT, CCValAssign::Full, ArgFlags, *this)) {
|
|
cerr << "Formal argument #" << i << " has unhandled type "
|
|
<< MVT::getValueTypeString(ArgVT) << "\n";
|
|
abort();
|
|
}
|
|
}
|
|
}
|
|
|
|
/// AnalyzeReturn - Analyze the returned values of an ISD::RET node,
|
|
/// incorporating info about the result values into this state.
|
|
void CCState::AnalyzeReturn(SDNode *TheRet, CCAssignFn Fn) {
|
|
// Determine which register each value should be copied into.
|
|
for (unsigned i = 0, e = TheRet->getNumOperands() / 2; i != e; ++i) {
|
|
MVT::ValueType VT = TheRet->getOperand(i*2+1).getValueType();
|
|
ISD::ArgFlagsTy ArgFlags =
|
|
cast<ARG_FLAGSSDNode>(TheRet->getOperand(i*2+2))->getArgFlags();
|
|
if (Fn(i, VT, VT, CCValAssign::Full, ArgFlags, *this)){
|
|
cerr << "Return operand #" << i << " has unhandled type "
|
|
<< MVT::getValueTypeString(VT) << "\n";
|
|
abort();
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/// AnalyzeCallOperands - Analyze an ISD::CALL node, incorporating info
|
|
/// about the passed values into this state.
|
|
void CCState::AnalyzeCallOperands(SDNode *TheCall, CCAssignFn Fn) {
|
|
unsigned NumOps = (TheCall->getNumOperands() - 5) / 2;
|
|
for (unsigned i = 0; i != NumOps; ++i) {
|
|
MVT::ValueType ArgVT = TheCall->getOperand(5+2*i).getValueType();
|
|
ISD::ArgFlagsTy ArgFlags =
|
|
cast<ARG_FLAGSSDNode>(TheCall->getOperand(5+2*i+1))->getArgFlags();
|
|
if (Fn(i, ArgVT, ArgVT, CCValAssign::Full, ArgFlags, *this)) {
|
|
cerr << "Call operand #" << i << " has unhandled type "
|
|
<< MVT::getValueTypeString(ArgVT) << "\n";
|
|
abort();
|
|
}
|
|
}
|
|
}
|
|
|
|
/// AnalyzeCallResult - Analyze the return values of an ISD::CALL node,
|
|
/// incorporating info about the passed values into this state.
|
|
void CCState::AnalyzeCallResult(SDNode *TheCall, CCAssignFn Fn) {
|
|
for (unsigned i = 0, e = TheCall->getNumValues() - 1; i != e; ++i) {
|
|
MVT::ValueType VT = TheCall->getValueType(i);
|
|
if (Fn(i, VT, VT, CCValAssign::Full, ISD::ArgFlagsTy(), *this)) {
|
|
cerr << "Call result #" << i << " has unhandled type "
|
|
<< MVT::getValueTypeString(VT) << "\n";
|
|
abort();
|
|
}
|
|
}
|
|
}
|