Mercurial > projects > ldc
view tools/binding/llvm-ext.cpp @ 1410:cc2d8a7388c7
Count the sret register as well when keeping track of how many integer registers
are available for extern(C) functions on x86-64.
Interestingly, llvm-g++ seems to have a very similar bug: http://llvm.org/pr4242
(So this breaks ABI-compatibility with llvm-gcc for this corner case, but gains
it with gcc...)
To clarify, this is about code like this:
{{{
struct S { void*[3] data; }
struct T { void*[2] data; }
// The T should be passed in memory, and p in the last int register.
extern(C) S fail(int, int, int, int, T t, void* p) {
S s;
s.data[0] = t.data[0];
s.data[1] = t.data[1];
s.data[2] = p;
return s;
}
}}}
which should generate code functionally equivalent to this:
{{{
extern(C) S* succeed(S* s, int, int, int, int, T t, void* p) {
s.data[0] = t.data[0];
s.data[1] = t.data[1];
s.data[2] = p;
return s;
}
}}}
(with the same definitions for S and T)
author | Frits van Bommel <fvbommel wxs.nl> |
---|---|
date | Fri, 22 May 2009 13:17:06 +0200 |
parents | 1ba61de8796b |
children |
line wrap: on
line source
// Extension of the LLVM C interface for use with D, some things in the // LLVM 2.2 release are kind sparse or even broken... // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // #ifndef D11_LLVMCEXT_H #define D11_LLVMCEXT_H #include "llvm/Type.h" #include "llvm/Constants.h" #include "llvm/Support/CFG.h" #include "llvm/Target/TargetData.h" #include "llvm-c/Core.h" #include <sstream> #include <cstring> using namespace llvm; using namespace std; extern "C" { // we need to be able to erase an instruction from its parent void LLVMEraseFromParent(LLVMValueRef I) { unwrap<Instruction>(I)->eraseFromParent(); } // we need to be able to check if a basic block is terminated int LLVMIsTerminated(LLVMBasicBlockRef BB) { return (unwrap(BB)->getTerminator() != NULL); } // we need to be able to check if a basic block has any predecessors int LLVMHasPredecessors(LLVMBasicBlockRef BB) { BasicBlock* B = unwrap(BB); return (pred_begin(B) != pred_end(B)); } // we need to be able to check if a basic block is empty int LLVMIsBasicBlockEmpty(LLVMBasicBlockRef BB) { return unwrap(BB)->empty(); } // we need to be able to replace all uses of V with W void LLVMReplaceAllUsesWith(LLVMValueRef V, LLVMValueRef W) { unwrap<Value>(V)->replaceAllUsesWith(unwrap<Value>(W)); } // sometimes it's nice to be able to dump a type, not only values... void LLVMDumpType(LLVMTypeRef T) { unwrap(T)->dump(); } LLVMValueRef LLVMGetOrInsertFunction(LLVMModuleRef M, char* Name, LLVMTypeRef Type) { return wrap(unwrap(M)->getOrInsertFunction(Name, unwrap<FunctionType>(Type))); } // being able to determine the "kind" of a value is really useful unsigned LLVMGetValueKind(LLVMValueRef Value) { return unwrap(Value)->getValueID(); } char* LLVMValueToString(LLVMValueRef v) { stringstream ss; unwrap(v)->print(ss); return strdup(ss.str().c_str()); } char* LLVMTypeToString(LLVMTypeRef ty) { stringstream ss; unwrap(ty)->print(ss); return strdup(ss.str().c_str()); } LLVMTypeRef LLVMGetTypeByName(LLVMModuleRef M, char* Name) { return wrap(unwrap(M)->getTypeByName(Name)); } int LLVMIsTypeAbstract(LLVMTypeRef T) { return unwrap(T)->isAbstract(); } } // extern "C" #endif