[OCaml] Bind di_type_get_flags to correct C function

alan-j-hu · alan-j-hu · commit 360ea6204d64 · 2023-08-13T10:22:44.000-04:00
Fixes llvm#64254 Differential Revision: https://reviews.llvm.org/D157812
diff --git a/llvm/bindings/ocaml/debuginfo/debuginfo_ocaml.c b/llvm/bindings/ocaml/debuginfo/debuginfo_ocaml.c
@@ -837,7 +837,7 @@ value llvm_di_type_get_line(value DType) {
 }
 
 value llvm_di_type_get_flags(value DType) {
-  LLVMDIFlags Flags = LLVMDITypeGetLine(Metadata_val(DType));
+  LLVMDIFlags Flags = LLVMDITypeGetFlags(Metadata_val(DType));
   return alloc_diflags(Flags);
 }
 

Original file line number	Diff line number	Diff line change
`@@ -837,7 +837,7 @@ value llvm_di_type_get_line(value DType) {`
`837`	`837`	`}`
`838`	`838`
`839`	`839`	`value llvm_di_type_get_flags(value DType) {`
`840`		`- LLVMDIFlags Flags = LLVMDITypeGetLine(Metadata_val(DType));`
	`840`	`+ LLVMDIFlags Flags = LLVMDITypeGetFlags(Metadata_val(DType));`
`841`	`841`	`return alloc_diflags(Flags);`
`842`	`842`	`}`
`843`	`843`