LLVM Ada language bindings. Credit to Rod Kay and the AuroraUX team.
[oota-llvm.git] / bindings / ada / bitwriter / llvm_bit_writer-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_bit_Writer.Binding is
9
10    function LLVMWriteBitcodeToFileHandle
11      (M      : in llvm.LLVMModuleRef;
12       Handle : in Interfaces.C.int)
13       return   Interfaces.C.int;
14
15    function LLVMWriteBitcodeToFile
16      (M    : in llvm.LLVMModuleRef;
17       Path : in Interfaces.C.Strings.chars_ptr)
18       return Interfaces.C.int;
19
20 private
21
22    pragma Import
23      (C,
24       LLVMWriteBitcodeToFileHandle,
25       "Ada_LLVMWriteBitcodeToFileHandle");
26    pragma Import (C, LLVMWriteBitcodeToFile, "Ada_LLVMWriteBitcodeToFile");
27
28 end LLVM_bit_Writer.Binding;