summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--bindings/ocaml/bitreader/bitreader_ocaml.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/bindings/ocaml/bitreader/bitreader_ocaml.c b/bindings/ocaml/bitreader/bitreader_ocaml.c
index 5fd9f854d9..318c7038e2 100644
--- a/bindings/ocaml/bitreader/bitreader_ocaml.c
+++ b/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 */