summaryrefslogtreecommitdiffstats
path: root/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c
diff options
context:
space:
mode:
Diffstat (limited to 'llvm/bindings/ocaml/bitreader/bitreader_ocaml.c')
-rw-r--r--llvm/bindings/ocaml/bitreader/bitreader_ocaml.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c b/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c
index 0264e73117d..a3f873c8d88 100644
--- a/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c
+++ b/llvm/bindings/ocaml/bitreader/bitreader_ocaml.c
@@ -31,10 +31,10 @@ CAMLprim value llvm_register_bitreader_exns(value Error) {
static void llvm_raise(value Prototype, char *Message) {
CAMLparam1(Prototype);
CAMLlocal1(CamlMessage);
-
+
CamlMessage = copy_string(Message);
LLVMDisposeMessage(Message);
-
+
raise_with_arg(Prototype, CamlMessage);
abort(); /* NOTREACHED */
#ifdef CAMLnoreturn
@@ -50,11 +50,11 @@ CAMLprim value llvm_get_module(LLVMContextRef C, LLVMMemoryBufferRef MemBuf) {
CAMLparam0();
CAMLlocal2(Variant, MessageVal);
char *Message;
-
+
LLVMModuleRef M;
if (LLVMGetBitcodeModuleInContext(C, MemBuf, &M, &Message))
llvm_raise(llvm_bitreader_error_exn, Message);
-
+
CAMLreturn((value) M);
}
@@ -65,9 +65,9 @@ CAMLprim value llvm_parse_bitcode(LLVMContextRef C,
CAMLlocal2(Variant, MessageVal);
LLVMModuleRef M;
char *Message;
-
+
if (LLVMParseBitcodeInContext(C, MemBuf, &M, &Message))
llvm_raise(llvm_bitreader_error_exn, Message);
-
+
CAMLreturn((value) M);
}
OpenPOWER on IntegriCloud