diff options
author | Erick Tryzelaar <idadesub@users.sourceforge.net> | 2010-02-28 20:44:58 +0000 |
---|---|---|
committer | Erick Tryzelaar <idadesub@users.sourceforge.net> | 2010-02-28 20:44:58 +0000 |
commit | 6ba5c56cf5b1609ec4af45f4901118865a8ed9b6 (patch) | |
tree | a6a741a16910346705cf544436801520ff08f995 /bindings/ocaml/llvm/llvm_ocaml.c | |
parent | ce89b4e66f7ec82b2b621c94b072f0b22827a3cd (diff) | |
download | llvm-6ba5c56cf5b1609ec4af45f4901118865a8ed9b6.tar.gz llvm-6ba5c56cf5b1609ec4af45f4901118865a8ed9b6.tar.bz2 llvm-6ba5c56cf5b1609ec4af45f4901118865a8ed9b6.tar.xz |
Add support for global aliases to ocaml.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@97413 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'bindings/ocaml/llvm/llvm_ocaml.c')
-rw-r--r-- | bindings/ocaml/llvm/llvm_ocaml.c | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/bindings/ocaml/llvm/llvm_ocaml.c b/bindings/ocaml/llvm/llvm_ocaml.c index 000db05449..78cf6e4368 100644 --- a/bindings/ocaml/llvm/llvm_ocaml.c +++ b/bindings/ocaml/llvm/llvm_ocaml.c @@ -807,6 +807,13 @@ CAMLprim value llvm_set_global_constant(value Flag, LLVMValueRef GlobalVar) { return Val_unit; } +/*--... Operations on aliases ..............................................--*/ + +CAMLprim LLVMValueRef llvm_add_alias(LLVMModuleRef M, LLVMTypeRef Ty, + LLVMValueRef Aliasee, value Name) { + return LLVMAddAlias(M, Ty, Aliasee, String_val(Name)); +} + /*--... Operations on functions ............................................--*/ DEFINE_ITERATORS(function, Function, LLVMModuleRef, LLVMValueRef, |