projects/ldc: gen/runtime.cpp annotate

annotate gen/runtime.cpp @ 197:bfcb657756f6 trunk

[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'. Fixed: string switch runtime support had wrong param types. Fixed: string switch on a temporary slice was broken.

author	lindquist
date	Mon, 12 May 2008 20:02:52 +0200
parents	2900754a6989
children	e881c9b1c738

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

Mercurial > projects > ldc

annotate gen/runtime.cpp @ 197:bfcb657756f6 trunk