Mercurial > hg > CbC > CbC_llvm

diff llvm/bindings/ocaml/linker/linker_ocaml.c @ 221:79ff65ed7e25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
LLVM12 Original
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 15 Jun 2021 19:15:29 +0900
parents 1d019706d866
children 1f2b6ac9f198
line wrap: on
line diff
--- a/llvm/bindings/ocaml/linker/linker_ocaml.c	Tue Jun 15 19:13:43 2021 +0900
+++ b/llvm/bindings/ocaml/linker/linker_ocaml.c	Tue Jun 15 19:15:29 2021 +0900
@@ -25,9 +25,10 @@
 void llvm_raise(value Prototype, char *Message);
 
 /* llmodule -> llmodule -> unit */
-CAMLprim value llvm_link_modules(LLVMModuleRef Dst, LLVMModuleRef Src) {
+value llvm_link_modules(LLVMModuleRef Dst, LLVMModuleRef Src) {
   if (LLVMLinkModules2(Dst, Src))
-    llvm_raise(*caml_named_value("Llvm_linker.Error"), LLVMCreateMessage("Linking failed"));
+    llvm_raise(*caml_named_value("Llvm_linker.Error"),
+               LLVMCreateMessage("Linking failed"));
 
   return Val_unit;
 }