[OCaml] Unbreak Llvm_target.TargetMachine.set_verbose_asm
authorPeter Zotov <whitequark@whitequark.org>
Mon, 9 Jun 2014 17:34:34 +0000 (17:34 +0000)
committerPeter Zotov <whitequark@whitequark.org>
Mon, 9 Jun 2014 17:34:34 +0000 (17:34 +0000)
Patch by Jacques-Pascal Deplaix

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@210480 91177308-0d34-0410-b5e6-96231b3b80d8

bindings/ocaml/target/target_ocaml.c

index 9e8778a..74e8185 100644 (file)
@@ -352,8 +352,8 @@ CAMLprim value llvm_targetmachine_data_layout(value Machine) {
   CAMLreturn(DataLayout);
 }
 
-/* TargetMachine.t -> bool -> unit */
-CAMLprim value llvm_targetmachine_set_verbose_asm(value Machine, value Verb) {
+/* bool -> TargetMachine.t -> unit */
+CAMLprim value llvm_targetmachine_set_verbose_asm(value Verb, value Machine) {
   LLVMSetTargetMachineAsmVerbosity(TargetMachine_val(Machine), Bool_val(Verb));
   return Val_unit;
 }