annotate gen/runtime.cpp @ 340:351c0077d0b3 trunk

[svn r361] Removed some dead code.
author lindquist
date Sun, 13 Jul 2008 02:04:25 +0200
parents 385a18242485
children cc40db549aea
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;
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
34 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
35
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
36 void LLVM_D_FreeRuntime()
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
37 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
38 if (M) {
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
39 Logger::println("*** Freeing D runtime declarations ***");
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
40 delete M;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
41 M = NULL;
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
42 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
43 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
44
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
45 //////////////////////////////////////////////////////////////////////////////////////////////////
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
46
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
47 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
48 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
49 if (global.params.noruntime) {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
50 error("No implicit runtime calls allowed with -noruntime option enabled");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
51 fatal();
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
52 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
53
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
54 if (!M) {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
55 assert(!runtime_failed);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
56 LLVM_D_InitRuntime();
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
57 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
58
98
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
59 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
60 if (fn)
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
61 return fn;
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
62
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
63 fn = M->getFunction(name);
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
64 if (!fn) {
98
6789050b5ad1 [svn r102] Further delayed emission of function bodies to avoid problems with circular-forward-references.
lindquist
parents: 86
diff changeset
65 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
66 assert(0);
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
67 //return NULL;
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
68 }
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
69
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
70 const llvm::FunctionType* fnty = fn->getFunctionType();
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
71 llvm::Function* resfn = llvm::cast<llvm::Function>(target->getOrInsertFunction(name, fnty));
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
72 resfn->setParamAttrs(fn->getParamAttrs());
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
73 return resfn;
1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough.
lindquist
parents:
diff changeset
74 }
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents: 35
diff changeset
75
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
76 //////////////////////////////////////////////////////////////////////////////////////////////////
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
77
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
78 llvm::GlobalVariable* LLVM_D_GetRuntimeGlobal(llvm::Module* target, const char* name)
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
79 {
57
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
80 llvm::GlobalVariable* gv = target->getNamedGlobal(name);
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
81 if (gv) {
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
82 return gv;
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
83 }
a9d29e9f1fed [svn r61] Added support for D-style variadic functions :)
lindquist
parents: 52
diff changeset
84
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
85 if (global.params.noruntime) {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
86 error("No implicit runtime calls allowed with -noruntime option enabled");
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
87 fatal();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
88 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
89
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
90 if (!M) {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
91 assert(!runtime_failed);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
92 LLVM_D_InitRuntime();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
93 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
94
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
95 llvm::GlobalVariable* g = M->getNamedGlobal(name);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
96 if (!g) {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
97 error("Runtime global '%s' was not found", name);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
98 fatal();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
99 //return NULL;
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
100 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
101
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
102 const llvm::PointerType* t = g->getType();
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents: 40
diff changeset
103 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
104 }
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
105
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
106 //////////////////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
107
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
108 static const LLType* rt_ptr(const LLType* t)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
109 {
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
110 return getPtrToType(t);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
111 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
112
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
113 static const LLType* rt_array(const LLType* elemty)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
114 {
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
115 std::vector<const LLType*> t;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
116 t.push_back(DtoSize_t());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
117 t.push_back(rt_ptr(elemty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
118 return rt_ptr(llvm::StructType::get(t));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
119 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
120
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
121 static const LLType* rt_array2(const LLType* elemty)
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
122 {
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
123 std::vector<const LLType*> t;
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
124 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
125 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
126 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
127 }
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
128
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
129 static const LLType* rt_dg1()
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
130 {
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
131 std::vector<const LLType*> types;
244
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
132 types.push_back(rt_ptr(LLType::Int8Ty));
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
133 types.push_back(rt_ptr(LLType::Int8Ty));
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
134 const llvm::FunctionType* fty = llvm::FunctionType::get(LLType::Int32Ty, types, false);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
135
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
136 std::vector<const LLType*> t;
244
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
137 t.push_back(rt_ptr(LLType::Int8Ty));
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
138 t.push_back(rt_ptr(fty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
139 return rt_ptr(llvm::StructType::get(t));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
140 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
141
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
142 static const LLType* rt_dg2()
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
143 {
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
144 std::vector<const LLType*> types;
244
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
145 types.push_back(rt_ptr(LLType::Int8Ty));
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
146 types.push_back(rt_ptr(LLType::Int8Ty));
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
147 types.push_back(rt_ptr(LLType::Int8Ty));
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
148 const llvm::FunctionType* fty = llvm::FunctionType::get(LLType::Int32Ty, types, false);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
149
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
150 std::vector<const LLType*> t;
244
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
151 t.push_back(rt_ptr(LLType::Int8Ty));
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
152 t.push_back(rt_ptr(fty));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
153 return rt_ptr(llvm::StructType::get(t));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
154 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
155
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
156 static void LLVM_D_BuildRuntimeModule()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
157 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
158 M = new llvm::Module("llvmdc internal runtime");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
159
244
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
160 const LLType* voidTy = LLType::VoidTy;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
161 const LLType* boolTy = LLType::Int1Ty;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
162 const LLType* byteTy = LLType::Int8Ty;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
163 const LLType* shortTy = LLType::Int16Ty;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
164 const LLType* intTy = LLType::Int32Ty;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
165 const LLType* longTy = LLType::Int64Ty;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
166 const LLType* floatTy = LLType::FloatTy;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB.
lindquist
parents: 240
diff changeset
167 const LLType* doubleTy = LLType::DoubleTy;
339
385a18242485 [svn r360] Another mostly rewrite of DtoArrayInit. Should be much more robust now, and probably faster code generated for the most common cases too!
lindquist
parents: 314
diff changeset
168 const LLType* realTy = (global.params.useFP80) ? LLType::X86_FP80Ty : LLType::DoubleTy;
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
169 const LLType* sizeTy = DtoSize_t();
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
170 const LLType* voidPtrTy = rt_ptr(byteTy);
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
171 const LLType* stringTy = rt_array(byteTy);
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
172 const LLType* wstringTy = rt_array(shortTy);
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
173 const LLType* dstringTy = rt_array(intTy);
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
174 const LLType* objectTy = rt_ptr(ClassDeclaration::object->type->ir.type->get());
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
175 const LLType* classInfoTy = rt_ptr(ClassDeclaration::classinfo->type->ir.type->get());
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
176 const LLType* typeInfoTy = rt_ptr(Type::typeinfo->type->ir.type->get());
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
177 const LLType* aaTy = rt_ptr(llvm::OpaqueType::get());
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
178
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
179 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
180 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
181 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
182
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
183 // 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
184 // 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
185 // void _d_switch_error( char[] file, uint line )
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
186 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
187 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
188 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
189 std::string fname3("_d_switch_error");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
190 std::vector<const LLType*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
191 types.push_back(stringTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
192 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
193 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
194 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
195 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
196 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
197 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
198 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname3, M)->setParamAttrs(palist);
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
199 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
200
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
201 // 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
202 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
203 std::string fname("_d_assert_msg");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
204 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
205 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
206 types.push_back(stringTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
207 types.push_back(intTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
208 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
209 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
210 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
211 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
212 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
213 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
214
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
215 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
216 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
217 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
218
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
219 // void* _d_allocmemoryT(TypeInfo ti)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
220 {
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
221 std::string fname("_d_allocmemoryT");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
222 std::vector<const LLType*> 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
223 types.push_back(typeInfoTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
224 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
225 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
226 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
227
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
228 // 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
229 // void* _d_newarrayiT(TypeInfo ti, size_t length)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
230 {
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
231 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
232 std::string fname2("_d_newarrayiT");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
233 std::vector<const LLType*> 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
234 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
235 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
236 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
237 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
238 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
239 }
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
286
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
241 // void* _d_newarraymT(TypeInfo ti, size_t length, size_t* dims)
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
242 // void* _d_newarraymiT(TypeInfo ti, size_t length, size_t* dims)
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
243 {
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
244 std::string fname("_d_newarraymT");
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
245 std::string fname2("_d_newarraymiT");
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
246 std::vector<const LLType*> types;
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
247 types.push_back(typeInfoTy);
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
248 types.push_back(sizeTy);
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
249 types.push_back(rt_ptr(sizeTy));
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
250 const llvm::FunctionType* fty = llvm::FunctionType::get(voidPtrTy, types, false);
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
251 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
252 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
253 }
a3b7c19c866c [svn r307] Fixed: multidimensional new expressions now work. Eg.:
lindquist
parents: 244
diff changeset
254
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 // 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
256 // 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
257 {
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
258 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
259 std::string fname2("_d_arraysetlengthiT");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
260 std::vector<const LLType*> 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
261 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
262 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
263 types.push_back(sizeTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
264 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
265 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
266 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
267 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
268 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
269
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
270 // 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
271 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
272 std::string fname("_d_newclass");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
273 std::vector<const LLType*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
274 types.push_back(classInfoTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
275 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
276 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
277 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
278
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
279 // 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
280 {
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
281 std::string fname("_d_delarray");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
282 std::vector<const LLType*> types;
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
283 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
284 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
285 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
286 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
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
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 // 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
290 // 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
291 // 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
292 {
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 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
294 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
295 std::string fname3("_d_callfinalizer");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
296 std::vector<const LLType*> types;
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
297 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
298 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
299 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
300 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
301 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
302 }
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
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 // 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
305 {
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 std::string fname("_d_delclass");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
307 std::vector<const LLType*> types;
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
308 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
309 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
310 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
311 }
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
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
313 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
314 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
315 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
316
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
317 #define ARRAY_INIT(TY,suffix) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
318 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
319 std::string fname("_d_array_init_"); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
320 fname.append(suffix); \
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
321 std::vector<const LLType*> types; \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
322 types.push_back(rt_ptr(TY)); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
323 types.push_back(sizeTy); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
324 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
325 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
326 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
327 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
328
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
329 ARRAY_INIT(boolTy,"i1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
330 ARRAY_INIT(byteTy,"i8")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
331 ARRAY_INIT(shortTy,"i16")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
332 ARRAY_INIT(intTy,"i32")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
333 ARRAY_INIT(longTy,"i64")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
334 ARRAY_INIT(floatTy,"float")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
335 ARRAY_INIT(doubleTy,"double")
339
385a18242485 [svn r360] Another mostly rewrite of DtoArrayInit. Should be much more robust now, and probably faster code generated for the most common cases too!
lindquist
parents: 314
diff changeset
336 ARRAY_INIT(realTy,"real")
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
337 ARRAY_INIT(voidPtrTy,"pointer")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
338
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
339 #undef ARRAY_INIT
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
340
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
341 // array init mem
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
342 // 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
343 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
344 std::string fname("_d_array_init_mem");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
345 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
346 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
347 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
348 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
349 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
350 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
351 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
352 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
353
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
354 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
355 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
356 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
357
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
358 // int _aApplycd1(char[] aa, dg_t dg)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
359 #define STR_APPLY1(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
360 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
361 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
362 std::string fname2(b); \
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
363 std::vector<const LLType*> types; \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
364 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
365 types.push_back(rt_dg1()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
366 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
367 llvm::PAListPtr palist; \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
368 palist = palist.addAttr(1, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
369 palist = palist.addAttr(2, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
370 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
371 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
372 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
373 STR_APPLY1(stringTy, "_aApplycw1", "_aApplycd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
374 STR_APPLY1(wstringTy, "_aApplywc1", "_aApplywd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
375 STR_APPLY1(dstringTy, "_aApplydc1", "_aApplydw1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
376 #undef STR_APPLY
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
377
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
378 // int _aApplycd2(char[] aa, dg2_t dg)
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
379 #define STR_APPLY2(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
380 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
381 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
382 std::string fname2(b); \
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
383 std::vector<const LLType*> types; \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
384 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
385 types.push_back(rt_dg2()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
386 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
387 llvm::PAListPtr palist; \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
388 palist = palist.addAttr(1, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
389 palist = palist.addAttr(2, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
390 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
391 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
392 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
393 STR_APPLY2(stringTy, "_aApplycw2", "_aApplycd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
394 STR_APPLY2(wstringTy, "_aApplywc2", "_aApplywd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
395 STR_APPLY2(dstringTy, "_aApplydc2", "_aApplydw2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
396 #undef STR_APPLY2
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
397
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
398 #define STR_APPLY_R1(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
399 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
400 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
401 std::string fname2(b); \
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
402 std::vector<const LLType*> types; \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
403 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
404 types.push_back(rt_dg1()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
405 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
406 llvm::PAListPtr palist; \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
407 palist = palist.addAttr(1, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
408 palist = palist.addAttr(2, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
409 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
410 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
411 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
412 STR_APPLY_R1(stringTy, "_aApplyRcw1", "_aApplyRcd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
413 STR_APPLY_R1(wstringTy, "_aApplyRwc1", "_aApplyRwd1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
414 STR_APPLY_R1(dstringTy, "_aApplyRdc1", "_aApplyRdw1")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
415 #undef STR_APPLY
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
416
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
417 #define STR_APPLY_R2(TY,a,b) \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
418 { \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
419 std::string fname(a); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
420 std::string fname2(b); \
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
421 std::vector<const LLType*> types; \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
422 types.push_back(TY); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
423 types.push_back(rt_dg2()); \
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
424 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false); \
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
425 llvm::PAListPtr palist; \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
426 palist = palist.addAttr(1, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
427 palist = palist.addAttr(2, llvm::ParamAttr::ByVal); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
428 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist); \
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
429 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist); \
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
430 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
431 STR_APPLY_R2(stringTy, "_aApplyRcw2", "_aApplyRcd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
432 STR_APPLY_R2(wstringTy, "_aApplyRwc2", "_aApplyRwd2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
433 STR_APPLY_R2(dstringTy, "_aApplyRdc2", "_aApplyRdw2")
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
434 #undef STR_APPLY2
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
435
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
436 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
437 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
438 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
439
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
440 // fixes the length for dynamic array casts
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
441 // 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
442 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
443 std::string fname("_d_array_cast_len");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
444 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
445 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
446 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
447 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
448 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
449 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
450 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
451
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
452 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
453 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
454 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
455
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
456 // 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
457 // void _d_main_args(uint n, char** args, ref char[][] res)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
458 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
459 std::string fname("_d_main_args");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
460 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
461 types.push_back(intTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
462 types.push_back(rt_ptr(rt_ptr(byteTy)));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
463 types.push_back(rt_array(stringTy->getContainedType(0)));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
464 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
465 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
466 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
467
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
468 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
469 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
470 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
471
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
472 // cast to object
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
473 // Object _d_toObject(void* p)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
474 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
475 std::string fname("_d_toObject");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
476 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
477 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
478 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
479 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
480 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
481
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
482 // cast interface
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
483 // Object _d_interface_cast(void* p, ClassInfo c)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
484 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
485 std::string fname("_d_interface_cast");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
486 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
487 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
488 types.push_back(classInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
489 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
490 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
491 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
492
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
493 // dynamic cast
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
494 // Object _d_dynamic_cast(Object o, ClassInfo c)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
495 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
496 std::string fname("_d_dynamic_cast");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
497 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
498 types.push_back(objectTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
499 types.push_back(classInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
500 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
501 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
502 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
503
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
504 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
505 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
506 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
507
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
508 // char[] _adReverseChar(char[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
509 // char[] _adSortChar(char[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
510 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
511 std::string fname("_adReverseChar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
512 std::string fname2("_adSortChar");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
513 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
514 types.push_back(stringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
515 types.push_back(stringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
516 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
517 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
518 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
519 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
520 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
521 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
522
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
523 // wchar[] _adReverseWchar(wchar[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
524 // wchar[] _adSortWchar(wchar[] a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
525 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
526 std::string fname("_adReverseWchar");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
527 std::string fname2("_adSortWchar");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
528 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
529 types.push_back(wstringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
530 types.push_back(wstringTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
531 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
532 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
533 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
534 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
535 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
536 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
537
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
538 // Array _adReverse(Array a, size_t szelem)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
539 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
540 std::string fname("_adReverse");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
541 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
542 types.push_back(rt_array(byteTy));
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 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
545 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
546 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
547 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
548 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
549 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
550
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
551 // Array _adDupT(TypeInfo ti, Array a)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
552 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
553 std::string fname("_adDupT");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
554 std::vector<const LLType*> types;
132
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 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
558 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
559 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
560 palist = palist.addAttr(3, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
561 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
562 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
563
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
564 // int _adEq(Array a1, Array a2, TypeInfo ti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
565 // int _adCmp(Array a1, Array a2, TypeInfo ti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
566 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
567 std::string fname("_adEq");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
568 std::string fname2("_adCmp");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
569 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
570 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
571 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
572 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
573 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
574 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
575 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
576 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
577 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
578 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
579 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
580
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
581 // int _adCmpChar(Array a1, Array a2)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
582 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
583 std::string fname("_adCmpChar");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
584 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
585 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
586 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
587 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
588 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
589 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
590 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
591 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
592 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
593
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
594 // Array _adSort(Array a, TypeInfo ti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
595 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
596 std::string fname("_adSort");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
597 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
598 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
599 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
600 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
601 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
602 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
603 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
604 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
605 }
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 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
609 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
610
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
611 // size_t _aaLen(AA aa)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
612 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
613 std::string fname("_aaLen");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
614 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
615 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
616 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
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
163
a8cd9bc1021a [svn r179] lots and lots of fixes, much more of tango now compiles/works.
lindquist
parents: 157
diff changeset
620 // void* _aaGet(AA* aa, TypeInfo keyti, size_t valuesize, void* pkey)
132
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("_aaGet");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
623 std::vector<const LLType*> types;
132
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);
163
a8cd9bc1021a [svn r179] lots and lots of fixes, much more of tango now compiles/works.
lindquist
parents: 157
diff changeset
626 types.push_back(sizeTy);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
627 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
628 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
629 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
630 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
631
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
632 // void* _aaGetRvalue(AA aa, TypeInfo keyti, size_t valuesize, void* pkey)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
633 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
634 std::string fname("_aaGetRvalue");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
635 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
636 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
637 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
638 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
639 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
640 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
641 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
642 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
643
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
644 // void* _aaIn(AA aa, TypeInfo keyti, void* pkey)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
645 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
646 std::string fname("_aaIn");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
647 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
648 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
649 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
650 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
651 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
652 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
653 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
654
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
655 // void _aaDel(AA aa, TypeInfo keyti, void* pkey)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
656 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
657 std::string fname("_aaDel");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
658 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
659 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
660 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
661 types.push_back(voidPtrTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
662 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
663 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
664 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
665
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
666 // ArrayRet_t _aaValues(AA aa, size_t keysize, size_t valuesize)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
667 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
668 std::string fname("_aaValues");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
669 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
670 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
671 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
672 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
673 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
674 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
675 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
676 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
677
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
678 // void* _aaRehash(AA* paa, TypeInfo keyti)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
679 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
680 std::string fname("_aaRehash");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
681 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
682 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
683 types.push_back(typeInfoTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
684 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
685 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
686 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
687
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
688 // ArrayRet_t _aaKeys(AA aa, size_t keysize)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
689 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
690 std::string fname("_aaKeys");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
691 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
692 types.push_back(rt_array(byteTy));
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
693 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
694 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
695 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
696 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
132
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 // int _aaApply(AA aa, size_t keysize, dg_t dg)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
700 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
701 std::string fname("_aaApply");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
702 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
703 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
704 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
705 types.push_back(rt_dg1());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
706 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
707 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
708 palist = palist.addAttr(3, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
709 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
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
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
712 // int _aaApply2(AA aa, size_t keysize, dg2_t dg)
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
713 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
714 std::string fname("_aaApply2");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
715 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
716 types.push_back(aaTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
717 types.push_back(sizeTy);
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
718 types.push_back(rt_dg1());
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
719 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
720 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
721 palist = palist.addAttr(3, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
722 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
723 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
724
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
725 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
726 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
727 /////////////////////////////////////////////////////////////////////////////////////
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
728
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
729 // void _moduleCtor()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
730 // void _moduleDtor()
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
731 {
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
732 std::string fname("_moduleCtor");
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
733 std::string fname2("_moduleDtor");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
734 std::vector<const LLType*> types;
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
735 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
736 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
737 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
738 }
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
739
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
740 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
741 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
742 /////////////////////////////////////////////////////////////////////////////////////
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 // 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
745 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
746 std::string fname("_d_toObject");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
747 std::vector<const LLType*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
748 types.push_back(voidPtrTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
749 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
750 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
751 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
752
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
753 // 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
754 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
755 std::string fname("_d_dynamic_cast");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
756 std::vector<const LLType*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
757 types.push_back(objectTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
758 types.push_back(classInfoTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
759 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
760 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
761 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
762
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
763 // 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
764 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
765 std::string fname("_d_interface_cast");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
766 std::vector<const LLType*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
767 types.push_back(voidPtrTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
768 types.push_back(classInfoTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
769 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
770 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
771 }
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
772
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
773 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
774 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
775 /////////////////////////////////////////////////////////////////////////////////////
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
776
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
777 // 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
778 {
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
779 std::string fname("_d_throw_exception");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
780 std::vector<const LLType*> types;
133
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
781 types.push_back(objectTy);
44a95ac7368a [svn r137] Many fixes towards tango.io.Console working, but not quite there yet...
lindquist
parents: 132
diff changeset
782 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
783 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
784 }
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
785
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
786 /////////////////////////////////////////////////////////////////////////////////////
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
787 /////////////////////////////////////////////////////////////////////////////////////
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
788 /////////////////////////////////////////////////////////////////////////////////////
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
789
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
790 // 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
791 {
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
792 std::string fname("_d_switch_string");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
793 std::vector<const LLType*> 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
794 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
795 types.push_back(stringTy);
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
796 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
797 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
798 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
799 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
800 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
801 }
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
802
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
803 // 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
804 {
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
805 std::string fname("_d_switch_ustring");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
806 std::vector<const LLType*> 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
807 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
808 types.push_back(wstringTy);
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
809 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
810 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
811 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
812 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
813 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
814 }
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
815
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
816 // 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
817 {
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
818 std::string fname("_d_switch_dstring");
213
7816aafeea3c [svn r229] Updated the object.d implementation to the latest Tango.
lindquist
parents: 209
diff changeset
819 std::vector<const LLType*> 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
820 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
821 types.push_back(dstringTy);
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
822 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
240
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
823 llvm::PAListPtr palist;
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
824 palist = palist.addAttr(1, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
825 palist = palist.addAttr(2, llvm::ParamAttr::ByVal);
0db62b770a49 [svn r257] Fixed: array .sort and .reverse runtime code was incorrect.
lindquist
parents: 213
diff changeset
826 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M)->setParamAttrs(palist);
191
2900754a6989 [svn r207] Fixed: the runtime support didn't handle string switch.
lindquist
parents: 173
diff changeset
827 }
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
828
309
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
829 /////////////////////////////////////////////////////////////////////////////////////
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
830 /////////////////////////////////////////////////////////////////////////////////////
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
831 /////////////////////////////////////////////////////////////////////////////////////
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
832
309
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
833 // void _d_criticalenter(D_CRITICAL_SECTION *dcs)
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
834 // void _d_criticalexit(D_CRITICAL_SECTION *dcs)
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
835 {
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
836 std::string fname("_d_criticalenter");
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
837 std::string fname2("_d_criticalexit");
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
838 std::vector<const LLType*> types;
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
839 types.push_back(rt_ptr(DtoMutexType()));
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
840 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
841 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
842 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
843 }
132
1700239cab2e [svn r136] MAJOR UNSTABLE UPDATE!!!
lindquist
parents: 98
diff changeset
844
309
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
845 // void _d_monitorenter(Object h)
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
846 // void _d_monitorexit(Object h)
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
847 {
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
848 std::string fname("_d_monitorenter");
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
849 std::string fname2("_d_monitorexit");
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
850 std::vector<const LLType*> types;
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
851 types.push_back(objectTy);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
852 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
853 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
854 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname2, M);
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
855 }
314
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
856
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
857 /////////////////////////////////////////////////////////////////////////////////////
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
858 /////////////////////////////////////////////////////////////////////////////////////
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
859 /////////////////////////////////////////////////////////////////////////////////////
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
860
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
861 // int _d_eh_personality(int ver, int actions, ulong eh_class, ptr eh_info, ptr context)
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
862 {
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
863 std::string fname("_d_eh_personality");
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
864 std::vector<const LLType*> types;
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
865 types.push_back(intTy);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
866 types.push_back(intTy);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
867 types.push_back(longTy);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
868 types.push_back(voidPtrTy);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
869 types.push_back(voidPtrTy);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
870 const llvm::FunctionType* fty = llvm::FunctionType::get(intTy, types, false);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
871 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
872 }
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
873
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
874 // void _d_eh_resume_unwind(ptr exc_struct)
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
875 {
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
876 std::string fname("_d_eh_resume_unwind");
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
877 std::vector<const LLType*> types;
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
878 types.push_back(voidPtrTy);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
879 const llvm::FunctionType* fty = llvm::FunctionType::get(voidTy, types, false);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
880 llvm::Function::Create(fty, llvm::GlobalValue::ExternalLinkage, fname, M);
8d98e42ece93 [svn r335] The basics of exception handling are in place.
ChristianK
parents: 309
diff changeset
881 }
309
d59c363fccad [svn r330] Implemented synchronized statements.
lindquist
parents: 286
diff changeset
882 }