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. */