diff options
| author | Peter Zotov <whitequark@whitequark.org> | 2013-11-03 08:27:37 +0000 |
|---|---|---|
| committer | Peter Zotov <whitequark@whitequark.org> | 2013-11-03 08:27:37 +0000 |
| commit | 88d74c3093de563408ceb834d999613038195e98 (patch) | |
| tree | 1aad08704a35031fa4c5cb274e63d78a22b0ba32 /bindings/ocaml/llvm/llvm_ocaml.c | |
| parent | 9d33bf70c228a5c3b57b1d9bf86ea5949bb77293 (diff) | |
| download | external_llvm-88d74c3093de563408ceb834d999613038195e98.zip external_llvm-88d74c3093de563408ceb834d999613038195e98.tar.gz external_llvm-88d74c3093de563408ceb834d999613038195e98.tar.bz2 | |
[OCaml] Fix ABI incompatibility
OCaml's type unit is not compatible with C's type void.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@193952 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 6de935a..80fa8c3 100644 --- a/bindings/ocaml/llvm/llvm_ocaml.c +++ b/bindings/ocaml/llvm/llvm_ocaml.c @@ -485,6 +485,13 @@ CAMLprim value llvm_dump_value(LLVMValueRef Val) { return Val_unit; } +/* llvalue -> llvalue -> unit */ +CAMLprim value llvm_replace_all_uses_with(LLVMValueRef OldVal, + LLVMValueRef NewVal) { + LLVMReplaceAllUsesWith(OldVal, NewVal); + return Val_unit; +} + /*--... Operations on users ................................................--*/ /* llvalue -> int -> llvalue */ |