LLVM Ada language bindings. Credit to Rod Kay and the AuroraUX team.
[oota-llvm.git] / bindings / ada / analysis / llvm_analysis-binding.ads
1 -- This file is generated by SWIG. Do *not* modify by hand.
2 --
3
4 with llvm;
5 with Interfaces.C.Strings;
6
7
8 package LLVM_Analysis.Binding is
9
10    function LLVMVerifyModule
11      (M          : in llvm.LLVMModuleRef;
12       Action     : in LLVM_Analysis.LLVMVerifierFailureAction;
13       OutMessage : access Interfaces.C.Strings.chars_ptr)
14       return       Interfaces.C.int;
15
16    function LLVMVerifyFunction
17      (Fn     : in llvm.LLVMValueRef;
18       Action : in LLVM_Analysis.LLVMVerifierFailureAction)
19       return   Interfaces.C.int;
20
21    procedure LLVMViewFunctionCFG (Fn : in llvm.LLVMValueRef);
22
23    procedure LLVMViewFunctionCFGOnly (Fn : in llvm.LLVMValueRef);
24
25 private
26
27    pragma Import (C, LLVMVerifyModule, "Ada_LLVMVerifyModule");
28    pragma Import (C, LLVMVerifyFunction, "Ada_LLVMVerifyFunction");
29    pragma Import (C, LLVMViewFunctionCFG, "Ada_LLVMViewFunctionCFG");
30    pragma Import (C, LLVMViewFunctionCFGOnly, "Ada_LLVMViewFunctionCFGOnly");
31
32 end LLVM_Analysis.Binding;