projects/ldc: tools/binding/llvm/builder.d annotate

annotate tools/binding/llvm/builder.d @ 1650:40bd4a0d4870

Update to work with LLVM 2.7. Removed use of dyn_cast, llvm no compiles without exceptions and rtti by default. We do need exceptions for the libconfig stuff, but rtti isn't necessary (anymore). Debug info needs to be rewritten, as in LLVM 2.7 the format has completely changed. To have something to look at while rewriting, the old code has been wrapped inside #ifndef DISABLE_DEBUG_INFO , this means that you have to define this to compile at the moment. Updated tango 0.99.9 patch to include updated EH runtime code, which is needed for LLVM 2.7 as well.

author	Tomas Lindquist Olsen
date	Wed, 19 May 2010 12:42:32 +0200
parents	4ff9ab0d472c
children

rev	line source
1273 1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	1 // Written in the D programming language by Tomas Lindquist Olsen 2008
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	2 // Binding of llvm.c.Core builder for D.
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	3 //
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	4 // This file is distributed under the University of Illinois Open Source
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	5 // License. See LICENSE.TXT for details.
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	6 //
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	7 module llvm.builder;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	8
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	9 import llvm.c.Core;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	10 import llvm.c.Ext;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	11
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	12 import llvm.llvm;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	13 import llvm.util;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	14
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	15 private
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	16 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	17 template Build_NoArgs_Mixin(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	18 const Build_NoArgs_Mixin = "
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	19 Value build"~N~"() {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	20 return new Value(LLVMBuild"~N~"(builder));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	21 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	22 ";
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	23 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	24
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	25 template Build_Mixin(char[] NAME, char[] ARGS, char[] VALUES) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	26 const Build_Mixin = "
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	27 Value build"~NAME~"("~ARGS~") {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	28 return new Value(LLVMBuild"~NAME~"(builder, "~VALUES~"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	29 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	30 ";
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	31 static assert(ARGS != "");
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	32 static assert(VALUES != "");
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	33 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	34
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	35 // unnamed
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	36 template Build_Value(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	37 const Build_Value = Build_Mixin!(N, "Value v", `v.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	38 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	39 template Build_Value_Value(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	40 const Build_Value_Value = Build_Mixin!(N, "Value v, Value w", `v.value, w.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	41 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	42 template Build_BB(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	43 const Build_BB = Build_Mixin!(N, "BasicBlock b", `b.bb`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	44 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	45 template Build_Value_BB_BB(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	46 const Build_Value_BB_BB = Build_Mixin!(N, "Value v, BasicBlock b1, BasicBlock b2", `v.value, b1.bb, b2.bb`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	47 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	48 template Build_Value_BB_uint(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	49 const Build_Value_BB_uint = Build_Mixin!(N, "Value v, BasicBlock b, uint n", `v.value, b.bb, n`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	50 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	51
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	52 // named
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	53 template Build_Named_Mixin(char[] NAME, char[] ARGS, char[] VALUES) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	54 const Build_Named_Mixin = Build_Mixin!(NAME, ARGS~", char[] name", VALUES~`, to_stringz(name)`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	55 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	56
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	57 template Build_Type_Name(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	58 const Build_Type_Name = Build_Named_Mixin!(N, "Type t", `t.ll`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	59 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	60 template Build_Value_Name(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	61 const Build_Value_Name = Build_Named_Mixin!(N, "Value v", `v.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	62 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	63 template Build_Type_Value_Name(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	64 const Build_Type_Value_Name = Build_Named_Mixin!(N, "Type t, Value v", `t.ll, v.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	65 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	66 template Build_Value_Type_Name(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	67 const Build_Value_Type_Name = Build_Named_Mixin!(N, "Value v, Type t", `v.value, t.ll`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	68 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	69 template Build_Value_Value_Name(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	70 const Build_Value_Value_Name = Build_Named_Mixin!(N, "Value a, Value b", `a.value, b.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	71 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	72 template Build_Value_Value_Value_Name(char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	73 const Build_Value_Value_Value_Name = Build_Named_Mixin!(N, "Value a, Value b, Value c", `a.value, b.value, c.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	74 }
1274 4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	75 template Build_Value_uint_Name(char[] N) {
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	76 const Build_Value_uint_Name = Build_Named_Mixin!(N, "Value a, uint n", `a.value, n`);
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	77 }
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	78 template Build_Value_Value_uint_Name(char[] N) {
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	79 const Build_Value_Value_uint_Name = Build_Named_Mixin!(N, "Value a, Value b, uint n", `a.value, b.value, n`);
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	80 }
1273 1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	81 template Build_Cmp(char[] PRED, char[] N) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	82 const Build_Cmp = Build_Named_Mixin!(N, ""~PRED~"Predicate p, Value l, Value r", `p, l.value, r.value`);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	83 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	84
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	85 template StringDistribute(alias T, U...)
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	86 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	87 static if (!U.length)
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	88 const char[] StringDistribute="";
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	89 else
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	90 const char[] StringDistribute = T!(U[0]) ~ StringDistribute!(T, U[1..$]);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	91 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	92 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	93
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	94 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	95 class Builder
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	96 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	97 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	98 private LLVMBuilderRef builder;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	99 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	100 this()
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	101 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	102 builder = LLVMCreateBuilder();
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	103 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	104 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	105 void dispose()
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	106 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	107 LLVMDisposeBuilder(builder);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	108 builder = null;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	109 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	110 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	111 ~this()
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	112 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	113 // safe because builder isn't on the GC heap and isn't exposed.
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	114 dispose();
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	115 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	116 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	117 void positionBefore(Value v)
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	118 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	119 assert(builder !is null);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	120 LLVMPositionBuilderBefore(builder, v.value);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	121 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	122 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	123 void positionAtEnd(BasicBlock bb)
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	124 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	125 assert(builder !is null);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	126 LLVMPositionBuilderAtEnd(builder, bb.bb);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	127 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	128 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	129 void positionAtStart(BasicBlock bb)
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	130 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	131 assert(builder !is null);
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	132 LLVMPositionBuilderBefore(builder, LLVMGetFirstInstruction(bb.bb));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	133 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	134 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	135 BasicBlock getInsertBlock()
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	136 {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	137 return new BasicBlock(LLVMGetInsertBlock(builder));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	138 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	139
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	140 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	141 mixin(StringDistribute!(Build_NoArgs_Mixin, "RetVoid", "Unwind", "Unreachable"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	142 mixin(Build_BB!("Br"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	143 mixin(Build_Value_BB_BB!("CondBr"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	144 mixin(Build_Value_BB_uint!("Switch"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	145 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	146 mixin(StringDistribute!(Build_Value, "Ret", "Free"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	147 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	148 mixin(Build_Value_Value!("Store"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	149 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	150 mixin(StringDistribute!(Build_Value_Value_Name,
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	151 "Add","Sub","Mul","UDiv","SDiv","FDiv","URem","SRem","FRem",
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	152 "Shl","LShr","AShr","And","Or","Xor",
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	153 "ExtractElement"
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	154 ));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	155 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	156 mixin(StringDistribute!(Build_Value_Name, "Neg","Not", "Load"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	157 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	158 mixin(StringDistribute!(Build_Value_Type_Name,
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	159 "Trunc","SExt","ZExt","FPTrunc","FPExt",
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	160 "UIToFP","SIToFP","FPToUI","FPToSI",
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	161 "PtrToInt","IntToPtr","BitCast",
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	162 "VAArg"
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	163 ));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	164 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	165 mixin(Build_Cmp!("Int","ICmp"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	166 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	167 mixin(Build_Cmp!("Real","FCmp"));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	168 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	169 mixin(StringDistribute!(Build_Type_Name,
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	170 "Phi", "Malloc", "Alloca"
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	171 ));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	172 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	173 mixin(StringDistribute!(Build_Type_Value_Name,
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	174 "ArrayMalloc", "ArrayAlloca"
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	175 ));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	176 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	177 mixin(StringDistribute!(Build_Value_Value_Value_Name,
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	178 "Select", "InsertElement", "ShuffleVector"
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	179 ));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	180 ///
1274 4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	181 mixin(Build_Value_uint_Name!("ExtractValue"));
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	182 ///
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	183 mixin(Build_Value_Value_uint_Name!("InsertValue"));
4ff9ab0d472c Check in some old changes to the binding, from before I had commit access. Frits van Bommel <fvbommel wxs.nl> parents: 1273 diff changeset	184 ///
1273 1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	185 Value buildCall(Value fn, Value[] args, char[] name) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	186 auto llargs = new LLVMValueRef[args.length];
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	187 foreach(i,a; args) llargs[i] = a.value;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	188 return new Value(LLVMBuildCall(builder, fn.value, llargs.ptr, llargs.length, to_stringz(name)));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	189 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	190 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	191 Value buildGEP(Value ptr, Value[] indices, char[] name) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	192 auto llindices = new LLVMValueRef[indices.length];
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	193 foreach(i,idx; indices) llindices[i] = idx.value;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	194 return new Value(LLVMBuildGEP(builder, ptr.value, llindices.ptr, llindices.length, to_stringz(name)));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	195 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	196 ///
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	197 Value buildInvoke(Value fn, Value[] args, BasicBlock thenbb, BasicBlock catchbb, char[] name) {
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	198 auto llargs = new LLVMValueRef[args.length];
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	199 foreach(i,a; args) llargs[i] = a.value;
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	200 return new Value(LLVMBuildInvoke(builder, fn.value, llargs.ptr, llargs.length, thenbb.bb, catchbb.bb, to_stringz(name)));
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	201 }
1ba61de8796b Committing LLVM binding for D as it currently exists in the SVN repository. Frits van Bommel <fvbommel wxs.nl> parents: diff changeset	202 }

Mercurial > projects > ldc

annotate tools/binding/llvm/builder.d @ 1650:40bd4a0d4870