mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-01-01 00:33:09 +00:00
[OCaml] Expose LLVMCloneModule.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@220903 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
parent
41796b40a9
commit
b0d3f64971
@ -313,6 +313,7 @@ external mdkind_id : llcontext -> string -> llmdkind = "llvm_mdkind_id"
|
||||
(*===-- Modules -----------------------------------------------------------===*)
|
||||
external create_module : llcontext -> string -> llmodule = "llvm_create_module"
|
||||
external dispose_module : llmodule -> unit = "llvm_dispose_module"
|
||||
external clone_module : llmodule -> llmodule = "LLVMCloneModule"
|
||||
external target_triple: llmodule -> string
|
||||
= "llvm_target_triple"
|
||||
external set_target_triple: string -> llmodule -> unit
|
||||
|
@ -431,6 +431,9 @@ val create_module : llcontext -> string -> llmodule
|
||||
[llvm::Module::~Module]. *)
|
||||
val dispose_module : llmodule -> unit
|
||||
|
||||
(** [clone_module m] returns an exact copy of module [m]. *)
|
||||
val clone_module : llmodule -> llmodule
|
||||
|
||||
(** [target_triple m] is the target specifier for the module [m], something like
|
||||
[i686-apple-darwin8]. See the method [llvm::Module::getTargetTriple]. *)
|
||||
val target_triple: llmodule -> string
|
||||
|
Loading…
Reference in New Issue
Block a user