Mercurial > hg > Members > tobaru > cbc > CbC_llvm
comparison bindings/ocaml/target/target_ocaml.c @ 77:54457678186b
LLVM 3.6
author | Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 08 Sep 2014 22:06:00 +0900 |
parents | 95c75e76d11b |
children | 60c9769439b8 |
comparison
equal
deleted
inserted
replaced
34:e874dbf0ad9d | 77:54457678186b |
---|---|
350 LLVMDisposeMessage(TargetDataCStr); | 350 LLVMDisposeMessage(TargetDataCStr); |
351 | 351 |
352 CAMLreturn(DataLayout); | 352 CAMLreturn(DataLayout); |
353 } | 353 } |
354 | 354 |
355 /* TargetMachine.t -> bool -> unit */ | 355 /* bool -> TargetMachine.t -> unit */ |
356 CAMLprim value llvm_targetmachine_set_verbose_asm(value Machine, value Verb) { | 356 CAMLprim value llvm_targetmachine_set_verbose_asm(value Verb, value Machine) { |
357 LLVMSetTargetMachineAsmVerbosity(TargetMachine_val(Machine), Bool_val(Verb)); | 357 LLVMSetTargetMachineAsmVerbosity(TargetMachine_val(Machine), Bool_val(Verb)); |
358 return Val_unit; | 358 return Val_unit; |
359 } | 359 } |
360 | 360 |
361 /* Llvm.llmodule -> CodeGenFileType.t -> string -> TargetMachine.t -> unit */ | 361 /* Llvm.llmodule -> CodeGenFileType.t -> string -> TargetMachine.t -> unit */ |