[OCaml] Unbreak Llvm_target.TargetMachine.set_verbose_asm

Patch by Jacques-Pascal Deplaix

llvm-svn: 210480
This commit is contained in:
Peter Zotov 2014-06-09 17:34:34 +00:00
parent de9b19fdc2
commit 5c56850c1f

View 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;
}