diff options
author | Jeffrey Yasskin <jyasskin@google.com> | 2010-02-27 00:25:18 +0000 |
---|---|---|
committer | Jeffrey Yasskin <jyasskin@google.com> | 2010-02-27 00:25:18 +0000 |
commit | 67c0aece75092d6d7cacc1d09fd6a76bfc89d397 (patch) | |
tree | 3ad2ffa74701cd0398beac5091d629be9da7987b /llvm/bindings/ocaml/bitreader/bitreader_ocaml.c | |
parent | d887f1da73e342487c9f28c2d1803d940c0ca1ba (diff) | |
download | bcm5719-llvm-67c0aece75092d6d7cacc1d09fd6a76bfc89d397.tar.gz bcm5719-llvm-67c0aece75092d6d7cacc1d09fd6a76bfc89d397.zip |
Fix the ocaml bindings for the bitcode reader.
llvm_get_module_provider() was returning a value of the wrong type.
llvm-svn: 97290
Diffstat (limited to 'llvm/bindings/ocaml/bitreader/bitreader_ocaml.c')
-rw-r--r-- | llvm/bindings/ocaml/bitreader/bitreader_ocaml.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c b/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c index 5fd9f854d9d..318c7038e21 100644 --- a/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c +++ b/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c @@ -56,7 +56,7 @@ CAMLprim value llvm_get_module_provider(LLVMContextRef C, if (LLVMGetBitcodeModuleProviderInContext(C, MemBuf, &MP, &Message)) llvm_raise(llvm_bitreader_error_exn, Message); - CAMLreturn((value) MemBuf); + CAMLreturn((value) MP); } /* Llvm.llcontext -> Llvm.llmemorybuffer -> Llvm.llmodule */ |