mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-06-24 08:24:33 +00:00
Fix a bug in the bc reader/writer: we were not correctly encoding varargs
nonccc calls (we were dropping the CC and tail flag). This broke several FORTRAN programs. Testcase here: Regression/Assembler/2006-05-26-VarargsCallEncode.ll git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@28501 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
@ -527,7 +527,8 @@ void BytecodeWriter::outputInstrVarArgsCall(const Instruction *I,
|
||||
// variable argument.
|
||||
NumFixedOperands = 3+NumParams;
|
||||
}
|
||||
output_vbr(2 * I->getNumOperands()-NumFixedOperands);
|
||||
output_vbr(2 * I->getNumOperands()-NumFixedOperands +
|
||||
unsigned(Opcode == 56 || Opcode == 58));
|
||||
|
||||
// The type for the function has already been emitted in the type field of the
|
||||
// instruction. Just emit the slot # now.
|
||||
@ -548,6 +549,14 @@ void BytecodeWriter::outputInstrVarArgsCall(const Instruction *I,
|
||||
assert(Slot >= 0 && "No slot number for value!?!?");
|
||||
output_vbr((unsigned)Slot);
|
||||
}
|
||||
|
||||
// If this is the escape sequence for call, emit the tailcall/cc info.
|
||||
if (Opcode == 58) {
|
||||
const CallInst *CI = cast<CallInst>(I);
|
||||
output_vbr((CI->getCallingConv() << 1) | unsigned(CI->isTailCall()));
|
||||
} else if (Opcode == 56) { // Invoke escape sequence.
|
||||
output_vbr(cast<InvokeInst>(I)->getCallingConv());
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user