diff options
Diffstat (limited to 'src/ortho/llvm-nodebug/llvm-target.ads')
-rw-r--r-- | src/ortho/llvm-nodebug/llvm-target.ads | 18 |
1 files changed, 12 insertions, 6 deletions
diff --git a/src/ortho/llvm-nodebug/llvm-target.ads b/src/ortho/llvm-nodebug/llvm-target.ads index b7c35848a..17cd0427f 100644 --- a/src/ortho/llvm-nodebug/llvm-target.ads +++ b/src/ortho/llvm-nodebug/llvm-target.ads @@ -39,17 +39,23 @@ package LLVM.Target is pragma Import (C, InitializeNativeAsmPrinter, "LLVMInitializeNativeAsmPrinter_noinline"); + -- Target Data + + -- Obtain the data layout for a module. + -- see Module::getDataLayout() + function GetModuleDataLayout (M : ModuleRef) return TargetDataRef; + pragma Import (C, GetModuleDataLayout, "LLVMGetModuleDataLayout"); + + -- Set the data layout for a module. + -- see Module::setDataLayout() + procedure SetModuleDataLayout (M : ModuleRef; DL : TargetDataRef); + pragma Import (C, SetModuleDataLayout, "LLVMSetModuleDataLayout"); + -- Creates target data from a target layout string. -- See the constructor llvm::DataLayout::DataLayout. function CreateTargetData (StringRep : Cstring) return TargetDataRef; pragma Import (C, CreateTargetData, "LLVMCreateTargetData"); - -- Adds target data information to a pass manager. This does not take - -- ownership of the target data. - -- See the method llvm::PassManagerBase::add. - procedure AddTargetData(TD : TargetDataRef; PM : PassManagerRef); - pragma Import (C, AddTargetData, "LLVMAddTargetData"); - -- Converts target data to a target layout string. The string must be -- disposed with LLVMDisposeMessage. -- See the constructor llvm::DataLayout::DataLayout. */ |