annotate gen/runtime.cpp @ 209:c4c9b4ac021b trunk

[svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
author lindquist
date Wed, 14 May 2008 01:22:40 +0200
parents 9d44ec83acd1
children 7816aafeea3c
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
1 #include <cassert>
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
2
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
3 #include "gen/llvm.h"
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
4 #include "llvm/Module.h"
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
5 #include "llvm/Bitcode/ReaderWriter.h"
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
6 #include "llvm/Support/MemoryBuffer.h"
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
7
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
8 #include "root.h"
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
9 #include "mars.h"
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
10 #include "lexer.h"
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
11 #include "dsymbol.h"
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
12 #include "mtype.h"
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
13 #include "aggregate.h"
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
14
4
e116aa1488e6 [svn r8] changed backend includes to always use the gen/<foo>.h prefix
lindquist
parents: 1
diff changeset
15 #include "gen/runtime.h"
e116aa1488e6 [svn r8] changed backend includes to always use the gen/<foo>.h prefix
lindquist
parents: 1
diff changeset
16 #include "gen/logger.h"
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
17 #include "gen/tollvm.h"
157
5c17f81fc1c1 [svn r173] moved IR state previously stored in Type into IrType and a Type->IrType map; fixes #7
ChristianK
parents: 133
diff changeset
18 #include "gen/irstate.h"
4
e116aa1488e6 [svn r8] changed backend includes to always use the gen/<foo>.h prefix
lindquist
parents: 1
diff changeset
19
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
20 static llvm::Module* M = NULL;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
21 static bool runtime_failed = false;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
22
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
23 static void LLVM_D_BuildRuntimeModule();
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
24
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
25 //////////////////////////////////////////////////////////////////////////////////////////////////
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
26
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
27 bool LLVM_D_InitRuntime()
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
28 {
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
29 Logger::println("*** Initializing D runtime declarations ***");
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
30 LOG_SCOPE;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
31
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
32 LLVM_D_BuildRuntimeModule();
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
33 return true;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
34
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
35 /*
35
3cfcb944304e [svn r39] * Updated to DMD 1.022 with the exception of:
lindquist
parents: 4
diff changeset
36 if (!global.params.runtimeImppath) {
3cfcb944304e [svn r39] * Updated to DMD 1.022 with the exception of:
lindquist
parents: 4
diff changeset
37 error("You must set the runtime import path with -E");
3cfcb944304e [svn r39] * Updated to DMD 1.022 with the exception of:
lindquist
parents: 4
diff changeset
38 fatal();
3cfcb944304e [svn r39] * Updated to DMD 1.022 with the exception of:
lindquist
parents: 4
diff changeset
39 }
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
40 std::string filename(global.params.runtimeImppath);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
41 filename.append("/llvmdcore.bc");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
42 llvm::MemoryBuffer* buffer = llvm::MemoryBuffer::getFile(filename.c_str(), filename.length());
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
43 if (!buffer) {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
44 Logger::println("Failed to load runtime library from disk");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
45 runtime_failed = true;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
46 return false;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
47 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
48
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
49 std::string errstr;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
50 bool retval = false;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
51 M = llvm::ParseBitcodeFile(buffer, &errstr);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
52 if (M) {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
53 retval = true;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
54 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
55 else {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
56 Logger::println("Failed to load runtime: %s", errstr.c_str());
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
57 runtime_failed = true;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
58 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
59
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
60 delete buffer;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
61 return retval;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
62 */
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
63 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
64
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
65 void LLVM_D_FreeRuntime()
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
66 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
67 if (M) {
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
68 Logger::println("*** Freeing D runtime declarations ***");
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
69 delete M;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
70 M = NULL;
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
71 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
72 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
73
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
74 //////////////////////////////////////////////////////////////////////////////////////////////////
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
75
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
76 llvm::Function* LLVM_D_GetRuntimeFunction(llvm::Module* target, const char* name)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
77 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
78 if (global.params.noruntime) {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
79 error("No implicit runtime calls allowed with -noruntime option enabled");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
80 fatal();
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
81 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
82
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
83 if (!M) {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
84 assert(!runtime_failed);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
85 LLVM_D_InitRuntime();
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
86 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
87
98
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
88 llvm::Function* fn = target->getFunction(name);
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
89 if (fn)
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
90 return fn;
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
91
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
92 fn = M->getFunction(name);
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
93 if (!fn) {
98
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
94 printf("Runtime function '%s' was not found\n", name);
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
95 assert(0);
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
96 //return NULL;
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
97 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
98
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
99 const llvm::FunctionType* fnty = fn->getFunctionType();
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
100 return llvm::cast<llvm::Function>(target->getOrInsertFunction(name, fnty));
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
101 }
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
102
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
103 //////////////////////////////////////////////////////////////////////////////////////////////////
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
104
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
105 llvm::GlobalVariable* LLVM_D_GetRuntimeGlobal(llvm::Module* target, const char* name)
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
106 {
57
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
107 llvm::GlobalVariable* gv = target->getNamedGlobal(name);
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
108 if (gv) {
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
109 return gv;
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
110 }
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
111
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
112 if (global.params.noruntime) {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
113 error("No implicit runtime calls allowed with -noruntime option enabled");
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
114 fatal();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
115 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
116
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
117 if (!M) {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
118 assert(!runtime_failed);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
119 LLVM_D_InitRuntime();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
120 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
121
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
122 llvm::GlobalVariable* g = M->getNamedGlobal(name);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
123 if (!g) {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
124 error("Runtime global '%s' was not found", name);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
125 fatal();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
126 //return NULL;
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
127 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
128
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
129 const llvm::PointerType* t = g->getType();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
130 return new llvm::GlobalVariable(t->getElementType(),g->isConstant(),g->getLinkage(),NULL,g->getName(),target);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
131 }
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
133 //////////////////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
134
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
135 static const llvm::Type* rt_ptr(const llvm::Type* t)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
136 {
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
137 return getPtrToType(t);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
138 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
139
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
140 static const llvm::Type* rt_array(const llvm::Type* elemty)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
141 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
142 std::vector<const llvm::Type*> t;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
143 t.push_back(DtoSize_t());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
144 t.push_back(rt_ptr(elemty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
145 return rt_ptr(llvm::StructType::get(t));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
146 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
147
197
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
148 static const llvm::Type* rt_array2(const llvm::Type* elemty)
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
149 {
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
150 std::vector<const llvm::Type*> t;
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
151 t.push_back(DtoSize_t());
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
152 t.push_back(rt_ptr(elemty));
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
153 return llvm::StructType::get(t);
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
154 }
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
155
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
156 static const llvm::Type* rt_dg1()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
157 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
158 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
159 types.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
160 types.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
161 const llvm::FunctionType* fty = llvm::FunctionType::get(llvm::Type::Int32Ty, types, false);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
162
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
163 std::vector<const llvm::Type*> t;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
164 t.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
165 t.push_back(rt_ptr(fty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
166 return rt_ptr(llvm::StructType::get(t));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
167 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
168
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
169 static const llvm::Type* rt_dg2()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
170 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
171 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
172 types.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
173 types.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
174 types.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
175 const llvm::FunctionType* fty = llvm::FunctionType::get(llvm::Type::Int32Ty, types, false);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
176
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
177 std::vector<const llvm::Type*> t;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
178 t.push_back(rt_ptr(llvm::Type::Int8Ty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
179 t.push_back(rt_ptr(fty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
180 return rt_ptr(llvm::StructType::get(t));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
181 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
182
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
183 static void LLVM_D_BuildRuntimeModule()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
184 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
185 M = new llvm::Module("llvmdc internal runtime");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
186
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
187 const llvm::Type* voidTy = llvm::Type::VoidTy;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
188 const llvm::Type* boolTy = llvm::Type::Int1Ty;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
189 const llvm::Type* byteTy = llvm::Type::Int8Ty;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
190 const llvm::Type* shortTy = llvm::Type::Int16Ty;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
191 const llvm::Type* intTy = llvm::Type::Int32Ty;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
192 const llvm::Type* longTy = llvm::Type::Int64Ty;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
193 const llvm::Type* floatTy = llvm::Type::FloatTy;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
194 const llvm::Type* doubleTy = llvm::Type::DoubleTy;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
195 const llvm::Type* sizeTy = DtoSize_t();
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
196 const llvm::Type* voidPtrTy = rt_ptr(byteTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
197 const llvm::Type* stringTy = rt_array(byteTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
198 const llvm::Type* wstringTy = rt_array(shortTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
199 const llvm::Type* dstringTy = rt_array(intTy);
173
db9890b3fb64 [svn r189] moving IR data back into DMD frontend nodes
ChristianK
parents: 163
diff changeset
200 const llvm::Type* objectTy = rt_ptr(ClassDeclaration::object->type->ir.type->get());
db9890b3fb64 [svn r189] moving IR data back into DMD frontend nodes
ChristianK
parents: 163
diff changeset
201 const llvm::Type* classInfoTy = rt_ptr(ClassDeclaration::classinfo->type->ir.type->get());
db9890b3fb64 [svn r189] moving IR data back into DMD frontend nodes
ChristianK
parents: 163
diff changeset
202 const llvm::Type* typeInfoTy = rt_ptr(Type::typeinfo->type->ir.type->get());
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
203 const llvm::Type* aaTy = rt_ptr(llvm::OpaqueType::get());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
204
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
205 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
206 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
207 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
208
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
209 // void _d_assert( char[] file, uint line )
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
210 // void _d_array_bounds( char[] file, uint line )
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
211 // void _d_switch_error( char[] file, uint line )
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
212 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
213 std::string fname("_d_assert");
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
214 std::string fname2("_d_array_bounds");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
215 std::string fname3("_d_switch_error");
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
216 std::vector<const llvm::Type*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
217 types.push_back(stringTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
218 types.push_back(intTy);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
219 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
220 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
221 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
222 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname3, M);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
223 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
224
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
225 // void _d_assert_msg( char[] msg, char[] file, uint line )
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
226 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
227 std::string fname("_d_assert_msg");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
228 std::vector<const llvm::Type*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
229 types.push_back(stringTy);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
230 types.push_back(stringTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
231 types.push_back(intTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
232 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
233 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
234 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
235
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
236 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
237 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
238 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
239
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
240 // void* _d_allocmemoryT(TypeInfo ti)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
241 {
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
242 std::string fname("_d_allocmemoryT");
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
243 std::vector<const llvm::Type*> types;
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
244 types.push_back(typeInfoTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
245 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
246 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
247 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
248
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
249 // void* _d_newarrayT(TypeInfo ti, size_t length)
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
250 // void* _d_newarrayiT(TypeInfo ti, size_t length)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
251 {
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
252 std::string fname("_d_newarrayT");
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
253 std::string fname2("_d_newarrayiT");
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
254 std::vector<const llvm::Type*> types;
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
255 types.push_back(typeInfoTy);
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
256 types.push_back(sizeTy);
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
257 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
258 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
259 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
260 }
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
261
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
262 // void* _d_arraysetlengthT(TypeInfo ti, size_t newlength, size_t plength, void* pdata)
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
263 // void* _d_arraysetlengthiT(TypeInfo ti, size_t newlength, size_t plength, void* pdata)
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
264 {
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
265 std::string fname("_d_arraysetlengthT");
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
266 std::string fname2("_d_arraysetlengthiT");
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
267 std::vector<const llvm::Type*> types;
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
268 types.push_back(typeInfoTy);
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
269 types.push_back(sizeTy);
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
270 types.push_back(sizeTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
271 types.push_back(voidPtrTy);
203
e881c9b1c738 [svn r219] Fixed: the tango/lib/gc/basic garbage collector now compiles and links into an executable (change in tango/lib/llvmdc-posix.mak), closes #5 .
lindquist
parents: 197
diff changeset
272 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
273 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
274 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
275 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
276
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
277 // Object _d_newclass(ClassInfo ci)
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
278 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
279 std::string fname("_d_newclass");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
280 std::vector<const llvm::Type*> types;
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
281 types.push_back(classInfoTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
282 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
283 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
284 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
285
209
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
286 // void _d_delarray(size_t plength, void* pdata)
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
287 {
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
288 std::string fname("_d_delarray");
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
289 std::vector<const llvm::Type*> types;
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
290 types.push_back(sizeTy);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
291 types.push_back(voidPtrTy);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
292 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
293 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
294 }
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
295
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
296 // void _d_delmemory(void* p)
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
297 // void _d_delinterface(void* p)
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
298 // void _d_callfinalizer(void* p)
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
299 {
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
300 std::string fname("_d_delmemory");
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
301 std::string fname2("_d_delinterface");
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
302 std::string fname3("_d_callfinalizer");
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
303 std::vector<const llvm::Type*> types;
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
304 types.push_back(voidPtrTy);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
305 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
306 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
307 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
308 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname3, M);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
309 }
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
310
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
311 // void _d_delclass(Object p)
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
312 {
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
313 std::string fname("_d_delclass");
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
314 std::vector<const llvm::Type*> types;
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
315 types.push_back(objectTy);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
316 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
317 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
318 }
c4c9b4ac021b [svn r225] Fixed: delete expressions no longer use llvm's free instruction, which crashes on a GC provided pointer.
lindquist
parents: 205
diff changeset
319
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
320 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
321 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
322 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
323
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
324 #define ARRAY_INIT(TY,suffix) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
325 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
326 std::string fname("_d_array_init_"); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
327 fname.append(suffix); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
328 std::vector<const llvm::Type*> types; \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
329 types.push_back(rt_ptr(TY)); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
330 types.push_back(sizeTy); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
331 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
332 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false); \
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
333 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
334 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
335
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
336 ARRAY_INIT(boolTy,"i1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
337 ARRAY_INIT(byteTy,"i8")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
338 ARRAY_INIT(shortTy,"i16")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
339 ARRAY_INIT(intTy,"i32")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
340 ARRAY_INIT(longTy,"i64")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
341 ARRAY_INIT(floatTy,"float")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
342 ARRAY_INIT(doubleTy,"double")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
343 ARRAY_INIT(voidPtrTy,"pointer")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
344
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
345 #undef ARRAY_INIT
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
346
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
347 // array init mem
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
348 // void _d_array_init_mem(void* a, size_t na, void* v, size_t nv)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
349 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
350 std::string fname("_d_array_init_mem");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
351 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
352 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
353 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
354 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
355 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
356 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
357 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
358 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
359
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
360 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
361 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
362 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
363
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
364 #define STR_APPLY1(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
365 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
366 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
367 std::string fname2(b); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
368 std::vector<const llvm::Type*> types; \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
369 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
370 types.push_back(rt_dg1()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
371 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
372 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M); \
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
373 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
374 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
375 STR_APPLY1(stringTy, "_aApplycw1", "_aApplycd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
376 STR_APPLY1(wstringTy, "_aApplywc1", "_aApplywd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
377 STR_APPLY1(dstringTy, "_aApplydc1", "_aApplydw1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
378 #undef STR_APPLY
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
379
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
380 #define STR_APPLY2(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
381 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
382 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
383 std::string fname2(b); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
384 std::vector<const llvm::Type*> types; \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
385 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
386 types.push_back(rt_dg2()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
387 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
388 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M); \
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
389 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
390 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
391 STR_APPLY2(stringTy, "_aApplycw2", "_aApplycd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
392 STR_APPLY2(wstringTy, "_aApplywc2", "_aApplywd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
393 STR_APPLY2(dstringTy, "_aApplydc2", "_aApplydw2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
394 #undef STR_APPLY2
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
395
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
396 #define STR_APPLY_R1(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
397 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
398 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
399 std::string fname2(b); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
400 std::vector<const llvm::Type*> types; \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
401 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
402 types.push_back(rt_dg1()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
403 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
404 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M); \
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
405 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
406 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
407 STR_APPLY_R1(stringTy, "_aApplyRcw1", "_aApplyRcd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
408 STR_APPLY_R1(wstringTy, "_aApplyRwc1", "_aApplyRwd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
409 STR_APPLY_R1(dstringTy, "_aApplyRdc1", "_aApplyRdw1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
410 #undef STR_APPLY
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
411
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
412 #define STR_APPLY_R2(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
413 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
414 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
415 std::string fname2(b); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
416 std::vector<const llvm::Type*> types; \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
417 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
418 types.push_back(rt_dg2()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
419 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
420 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M); \
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
421 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
422 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
423 STR_APPLY_R2(stringTy, "_aApplyRcw2", "_aApplyRcd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
424 STR_APPLY_R2(wstringTy, "_aApplyRwc2", "_aApplyRwd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
425 STR_APPLY_R2(dstringTy, "_aApplyRdc2", "_aApplyRdw2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
426 #undef STR_APPLY2
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
427
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
428 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
429 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
430 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
431
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
432 // fixes the length for dynamic array casts
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
433 // size_t _d_array_cast_len(size_t len, size_t elemsz, size_t newelemsz)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
434 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
435 std::string fname("_d_array_cast_len");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
436 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
437 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
438 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
439 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
440 const llvm::FunctionType* fty = llvm::FunctionType::get(sizeTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
441 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
442 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
443
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
444 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
445 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
446 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
447
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
448 // builds the d string[] for the D main args from the C main args
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
449 // void _d_main_args(uint n, char** args, ref char[][] res)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
450 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
451 std::string fname("_d_main_args");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
452 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
453 types.push_back(intTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
454 types.push_back(rt_ptr(rt_ptr(byteTy)));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
455 types.push_back(rt_array(stringTy->getContainedType(0)));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
456 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
457 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
458 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
459
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
460 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
461 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
462 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
463
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
464 // cast to object
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
465 // Object _d_toObject(void* p)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
466 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
467 std::string fname("_d_toObject");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
468 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
469 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
470 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
471 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
472 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
473
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
474 // cast interface
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
475 // Object _d_interface_cast(void* p, ClassInfo c)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
476 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
477 std::string fname("_d_interface_cast");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
478 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
479 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
480 types.push_back(classInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
481 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
482 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
483 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
484
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
485 // dynamic cast
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
486 // Object _d_dynamic_cast(Object o, ClassInfo c)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
487 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
488 std::string fname("_d_dynamic_cast");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
489 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
490 types.push_back(objectTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
491 types.push_back(classInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
492 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
493 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
494 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
495
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
496 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
497 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
498 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
499
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
500 // char[] _adReverseChar(char[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
501 // char[] _adSortChar(char[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
502 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
503 std::string fname("_adReverseChar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
504 std::string fname2("_adSortChar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
505 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
506 types.push_back(stringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
507 types.push_back(stringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
508 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
509 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
510 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
511 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
512
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
513 // wchar[] _adReverseWchar(wchar[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
514 // wchar[] _adSortWchar(wchar[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
515 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
516 std::string fname("_adReverseWchar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
517 std::string fname2("_adSortWchar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
518 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
519 types.push_back(wstringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
520 types.push_back(wstringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
521 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
522 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
523 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
524 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
525
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
526 // Array _adReverse(Array a, size_t szelem)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
527 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
528 std::string fname("_adReverse");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
529 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
530 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
531 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
532 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
533 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
534 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
535 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
536
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
537 // Array _adDupT(TypeInfo ti, Array a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
538 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
539 std::string fname("_adDupT");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
540 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
541 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
542 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
543 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
544 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
545 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
546 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
547
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
548 // int _adEq(Array a1, Array a2, TypeInfo ti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
549 // int _adCmp(Array a1, Array a2, TypeInfo ti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
550 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
551 std::string fname("_adEq");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
552 std::string fname2("_adCmp");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
553 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
554 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
555 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
556 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
557 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
558 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
559 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
560 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
561
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
562 // int _adCmpChar(Array a1, Array a2)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
563 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
564 std::string fname("_adCmpChar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
565 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
566 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
567 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
568 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
569 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
570 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
571
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
572 // Array _adSort(Array a, TypeInfo ti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
573 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
574 std::string fname("_adSort");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
575 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
576 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
577 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
578 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
579 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
580 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
581 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
582
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
583 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
584 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
585 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
586
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
587 // size_t _aaLen(AA aa)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
588 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
589 std::string fname("_aaLen");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
590 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
591 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
592 const llvm::FunctionType* fty = llvm::FunctionType::get(sizeTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
593 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
594 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
595
163
a8cd9bc1021a [svn r179] lots and lots of fixes, much more of tango now compiles/works.
lindquist
parents: 157
diff changeset
596 // void* _aaGet(AA* aa, TypeInfo keyti, size_t valuesize, void* pkey)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
597 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
598 std::string fname("_aaGet");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
599 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
600 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
601 types.push_back(typeInfoTy);
163
a8cd9bc1021a [svn r179] lots and lots of fixes, much more of tango now compiles/works.
lindquist
parents: 157
diff changeset
602 types.push_back(sizeTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
603 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
604 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
605 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
606 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
607
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
608 // void* _aaGetRvalue(AA aa, TypeInfo keyti, size_t valuesize, void* pkey)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
609 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
610 std::string fname("_aaGetRvalue");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
611 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
612 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
613 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
614 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
615 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
616 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
617 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
618 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
619
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
620 // void* _aaIn(AA aa, TypeInfo keyti, void* pkey)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
621 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
622 std::string fname("_aaIn");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
623 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
624 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
625 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
626 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
627 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
628 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
629 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
630
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
631 // void _aaDel(AA aa, TypeInfo keyti, void* pkey)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
632 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
633 std::string fname("_aaDel");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
634 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
635 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
636 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
637 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
638 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
639 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
640 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
641
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
642 // ArrayRet_t _aaValues(AA aa, size_t keysize, size_t valuesize)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
643 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
644 std::string fname("_aaValues");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
645 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
646 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
647 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
648 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
649 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
650 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
651 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
652 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
653
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
654 // void* _aaRehash(AA* paa, TypeInfo keyti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
655 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
656 std::string fname("_aaRehash");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
657 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
658 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
659 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
660 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
661 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
662 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
663
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
664 // ArrayRet_t _aaKeys(AA aa, size_t keysize)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
665 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
666 std::string fname("_aaKeys");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
667 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
668 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
669 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
670 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
671 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
672 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
673 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
674
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
675 // int _aaApply(AA aa, size_t keysize, dg_t dg)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
676 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
677 std::string fname("_aaApply");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
678 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
679 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
680 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
681 types.push_back(rt_dg1());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
682 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
683 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
684 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
685
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
686 // int _aaApply2(AA aa, size_t keysize, dg2_t dg)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
687 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
688 std::string fname("_aaApply2");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
689 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
690 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
691 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
692 types.push_back(rt_dg1());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
693 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
694 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
695 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
696
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
697 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
698 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
699 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
700
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
701 // void _moduleCtor()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
702 // void _moduleDtor()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
703 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
704 std::string fname("_moduleCtor");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
705 std::string fname2("_moduleDtor");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
706 std::vector<const llvm::Type*> types;
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
707 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
708 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
709 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
710 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
711
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
712 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
713 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
714 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
715
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
716 // Object _d_toObject(void* p)
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
717 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
718 std::string fname("_d_toObject");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
719 std::vector<const llvm::Type*> types;
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
720 types.push_back(voidPtrTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
721 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
722 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
723 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
724
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
725 // Object _d_dynamic_cast(Object o, ClassInfo c)
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
726 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
727 std::string fname("_d_dynamic_cast");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
728 std::vector<const llvm::Type*> types;
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
729 types.push_back(objectTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
730 types.push_back(classInfoTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
731 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
732 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
733 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
734
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
735 // Object _d_interface_cast(void* p, ClassInfo c)
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
736 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
737 std::string fname("_d_interface_cast");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
738 std::vector<const llvm::Type*> types;
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
739 types.push_back(voidPtrTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
740 types.push_back(classInfoTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
741 const llvm::FunctionType* fty = llvm::FunctionType::get(objectTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
742 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
743 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
744
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
745 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
746 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
747 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
748
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
749 // void _d_throw_exception(Object e)
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
750 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
751 std::string fname("_d_throw_exception");
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
752 std::vector<const llvm::Type*> types;
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
753 types.push_back(objectTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
754 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
755 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
756 }
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
757
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
758 /////////////////////////////////////////////////////////////////////////////////////
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
759 /////////////////////////////////////////////////////////////////////////////////////
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
760 /////////////////////////////////////////////////////////////////////////////////////
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
761
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
762 // int _d_switch_string(char[][] table, char[] ca)
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
763 {
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
764 std::string fname("_d_switch_string");
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
765 std::vector<const llvm::Type*> types;
197
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
766 types.push_back(rt_array(rt_array2(byteTy)));
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
767 types.push_back(stringTy);
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
768 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
769 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
770 }
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
771
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
772 // int _d_switch_ustring(wchar[][] table, wchar[] ca)
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
773 {
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
774 std::string fname("_d_switch_ustring");
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
775 std::vector<const llvm::Type*> types;
197
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
776 types.push_back(rt_array(rt_array2(shortTy)));
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
777 types.push_back(wstringTy);
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
778 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
779 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
780 }
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
781
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
782 // int _d_switch_dstring(dchar[][] table, dchar[] ca)
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
783 {
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
784 std::string fname("_d_switch_dstring");
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
785 std::vector<const llvm::Type*> types;
197
bfcb657756f6 [svn r213] Fixed: foreach on an object seems to have been broken, the issue was that DMD generates an implicit delegate with conflicting types for 'this'.
lindquist
parents: 191
diff changeset
786 types.push_back(rt_array(rt_array2(intTy)));
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
787 types.push_back(dstringTy);
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
788 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
205
9d44ec83acd1 [svn r221] Update: Switched to the 2.3 LLVM svn branch, http://llvm.org/svn/llvm-project/llvm/branches/release_23 .
lindquist
parents: 203
diff changeset
789 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
790 }
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
791 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
792
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
793
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
794
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
795
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
796
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
797