diff options
Diffstat (limited to 'llvm/bindings/ocaml/executionengine/executionengine_ocaml.c')
| -rw-r--r-- | llvm/bindings/ocaml/executionengine/executionengine_ocaml.c | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/llvm/bindings/ocaml/executionengine/executionengine_ocaml.c b/llvm/bindings/ocaml/executionengine/executionengine_ocaml.c index a12cc0091ae..c647d23133c 100644 --- a/llvm/bindings/ocaml/executionengine/executionengine_ocaml.c +++ b/llvm/bindings/ocaml/executionengine/executionengine_ocaml.c @@ -25,16 +25,7 @@ #include "caml/memory.h" #include "caml/callback.h" -static void llvm_raise(value Prototype, char *Message) { - CAMLparam1(Prototype); - CAMLlocal1(CamlMessage); - - CamlMessage = copy_string(Message); - LLVMDisposeMessage(Message); - - raise_with_arg(Prototype, CamlMessage); - CAMLnoreturn; -} +void llvm_raise(value Prototype, char *Message); /*--... Operations on generic values .......................................--*/ |
