mirror of
https://github.com/RPCS3/llvm-mirror.git
synced 2024-11-29 22:30:33 +00:00
Fix some ocaml documentation
llvm-svn: 96323
This commit is contained in:
parent
29190e6398
commit
f6e2c05ad6
@ -1420,13 +1420,13 @@ external build_aggregate_ret : llvalue array -> llbuilder -> llvalue
|
||||
= "llvm_build_aggregate_ret"
|
||||
|
||||
(** [build_br bb b] creates a
|
||||
[b %bb]
|
||||
[br %bb]
|
||||
instruction at the position specified by the instruction builder [b].
|
||||
See the method [llvm::LLVMBuilder::CreateBr]. *)
|
||||
external build_br : llbasicblock -> llbuilder -> llvalue = "llvm_build_br"
|
||||
|
||||
(** [build_cond_br cond tbb fbb b] creates a
|
||||
[b %cond, %tbb, %fbb]
|
||||
[br %cond, %tbb, %fbb]
|
||||
instruction at the position specified by the instruction builder [b].
|
||||
See the method [llvm::LLVMBuilder::CreateCondBr]. *)
|
||||
external build_cond_br : llvalue -> llbasicblock -> llbasicblock -> llbuilder ->
|
||||
@ -1476,7 +1476,7 @@ external build_unreachable : llbuilder -> llvalue = "llvm_build_unreachable"
|
||||
external build_add : llvalue -> llvalue -> string -> llbuilder -> llvalue
|
||||
= "llvm_build_add"
|
||||
|
||||
(** [build_nswadd x y name b] creates a
|
||||
(** [build_nsw_add x y name b] creates a
|
||||
[%name = nsw add %x, %y]
|
||||
instruction at the position specified by the instruction builder [b].
|
||||
See the method [llvm::LLVMBuilder::CreateNSWAdd]. *)
|
||||
|
@ -1031,8 +1031,8 @@ CAMLprim LLVMValueRef llvm_build_switch(LLVMValueRef Of,
|
||||
return LLVMBuildSwitch(Builder_val(B), Of, Else, Int_val(EstimatedCount));
|
||||
}
|
||||
|
||||
CAMLprim value llvm_add_case(LLVMValueRef Switch,
|
||||
LLVMValueRef OnVal,
|
||||
/* llvalue -> llvalue -> llbasicblock -> unit */
|
||||
CAMLprim value llvm_add_case(LLVMValueRef Switch, LLVMValueRef OnVal,
|
||||
LLVMBasicBlockRef Dest) {
|
||||
LLVMAddCase(Switch, OnVal, Dest);
|
||||
return Val_unit;
|
||||
|
Loading…
Reference in New Issue
Block a user