diff options
| author | Peter Zotov <whitequark@whitequark.org> | 2013-11-05 11:56:13 +0000 |
|---|---|---|
| committer | Peter Zotov <whitequark@whitequark.org> | 2013-11-05 11:56:13 +0000 |
| commit | ce7a91b2778f7cc3adf714c25734f219937af1ea (patch) | |
| tree | 37f2861b8174b776c783dccacf5de0040bee66ef /llvm/bindings | |
| parent | 8c71337abcc4cb3bf0aa1001e4a7b3ed98ad79d6 (diff) | |
| download | bcm5719-llvm-ce7a91b2778f7cc3adf714c25734f219937af1ea.tar.gz bcm5719-llvm-ce7a91b2778f7cc3adf714c25734f219937af1ea.zip | |
[OCaml] (PR11717) Make declare_qualified_global respect address argument
Original patch by Jonathan Ragan-Kelley
llvm-svn: 194064
Diffstat (limited to 'llvm/bindings')
| -rw-r--r-- | llvm/bindings/ocaml/llvm/llvm_ocaml.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/llvm/bindings/ocaml/llvm/llvm_ocaml.c b/llvm/bindings/ocaml/llvm/llvm_ocaml.c index 927432e2479..46c170b44f3 100644 --- a/llvm/bindings/ocaml/llvm/llvm_ocaml.c +++ b/llvm/bindings/ocaml/llvm/llvm_ocaml.c @@ -930,7 +930,8 @@ CAMLprim LLVMValueRef llvm_declare_qualified_global(LLVMTypeRef Ty, value Name, LLVMPointerType(Ty, Int_val(AddressSpace))); return GlobalVar; } - return LLVMAddGlobal(M, Ty, String_val(Name)); + return LLVMAddGlobalInAddressSpace(M, Ty, String_val(Name), + Int_val(AddressSpace)); } /* string -> llmodule -> llvalue option */ |
