RPCS3/llvm-mirror
1
0
Fork 0
mirror of https://github.com/RPCS3/llvm-mirror.git synced 2025-01-31 20:51:52 +01:00
Code Issues Projects Releases Wiki Activity

fix llvm_build_struct_gep for PR6167, patch by

Browse Source 
Peter Hawkins!

llvm-svn: 95644
This commit is contained in:
Chris Lattner 2010-02-09 01:39:46 +00:00
parent f6d9c1f90c
commit fbda857b5c
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
bindings/ocaml/llvm/llvm_ocaml.c
View File

@ -1263,11 +1263,10 @@ CAMLprim LLVMValueRef llvm_build_in_bounds_gep(LLVMValueRef Pointer,
/* llvalue -> int -> string -> llbuilder -> llvalue */ /* llvalue -> int -> string -> llbuilder -> llvalue */
CAMLprim LLVMValueRef llvm_build_struct_gep(LLVMValueRef Pointer, CAMLprim LLVMValueRef llvm_build_struct_gep(LLVMValueRef Pointer,
value Indices, value Name, value Index, value Name,
value B) { value B) {
return LLVMBuildInBoundsGEP(Builder_val(B), Pointer, return LLVMBuildStructGEP(Builder_val(B), Pointer,
(LLVMValueRef *) Op_val(Indices), Int_val(Index), String_val(Name));
Wosize_val(Indices), String_val(Name));
} }
/* string -> string -> llbuilder -> llvalue */ /* string -> string -> llbuilder -> llvalue */