1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
|
#include "slang-ir-util.h"
#include "slang-ir-insts.h"
#include "slang-ir-clone.h"
#include "slang-ir-dce.h"
namespace Slang
{
bool isPointerOfType(IRInst* type, IROp opCode)
{
if (auto ptrType = as<IRPtrTypeBase>(type))
{
return ptrType->getValueType() && ptrType->getValueType()->getOp() == opCode;
}
return false;
}
Dictionary<IRInst*, IRInst*> buildInterfaceRequirementDict(IRInterfaceType* interfaceType)
{
Dictionary<IRInst*, IRInst*> result;
for (UInt i = 0; i < interfaceType->getOperandCount(); i++)
{
auto entry = as<IRInterfaceRequirementEntry>(interfaceType->getOperand(i));
if (!entry) continue;
result[entry->getRequirementKey()] = entry->getRequirementVal();
}
return result;
}
bool isPointerOfType(IRInst* type, IRInst* elementType)
{
if (auto ptrType = as<IRPtrTypeBase>(type))
{
return ptrType->getValueType() && isTypeEqual(ptrType->getValueType(), (IRType*)elementType);
}
return false;
}
bool isPtrToClassType(IRInst* type)
{
return isPointerOfType(type, kIROp_ClassType);
}
bool isPtrToArrayType(IRInst* type)
{
return isPointerOfType(type, kIROp_ArrayType) || isPointerOfType(type, kIROp_UnsizedArrayType);
}
bool isComInterfaceType(IRType* type)
{
if (!type) return false;
if (type->findDecoration<IRComInterfaceDecoration>() ||
type->getOp() == kIROp_ComPtrType)
{
return true;
}
if (auto witnessTableType = as<IRWitnessTableTypeBase>(type))
{
return isComInterfaceType((IRType*)witnessTableType->getConformanceType());
}
if (auto ptrType = as<IRNativePtrType>(type))
{
auto valueType = ptrType->getValueType();
return valueType->findDecoration<IRComInterfaceDecoration>() != nullptr;
}
return false;
}
IROp getTypeStyle(IROp op)
{
switch (op)
{
case kIROp_VoidType:
case kIROp_BoolType:
{
return op;
}
case kIROp_Int8Type:
case kIROp_Int16Type:
case kIROp_IntType:
case kIROp_UInt8Type:
case kIROp_UInt16Type:
case kIROp_UIntType:
case kIROp_Int64Type:
case kIROp_UInt64Type:
case kIROp_IntPtrType:
case kIROp_UIntPtrType:
{
// All int like
return kIROp_IntType;
}
case kIROp_HalfType:
case kIROp_FloatType:
case kIROp_DoubleType:
{
// All float like
return kIROp_FloatType;
}
default: return kIROp_Invalid;
}
}
IROp getTypeStyle(BaseType op)
{
switch (op)
{
case BaseType::Void:
return kIROp_VoidType;
case BaseType::Bool:
return kIROp_BoolType;
case BaseType::Char:
case BaseType::Int8:
case BaseType::Int16:
case BaseType::Int:
case BaseType::Int64:
case BaseType::IntPtr:
case BaseType::UInt8:
case BaseType::UInt16:
case BaseType::UInt:
case BaseType::UInt64:
case BaseType::UIntPtr:
return kIROp_IntType;
case BaseType::Half:
case BaseType::Float:
case BaseType::Double:
return kIROp_FloatType;
default:
return kIROp_Invalid;
}
}
IRInst* specializeWithGeneric(IRBuilder& builder, IRInst* genericToSpecialize, IRGeneric* userGeneric)
{
List<IRInst*> genArgs;
for (auto param : userGeneric->getFirstBlock()->getParams())
{
genArgs.add(param);
}
return builder.emitSpecializeInst(
builder.getTypeKind(),
genericToSpecialize,
(UInt)genArgs.getCount(),
genArgs.getBuffer());
}
IRInst* maybeSpecializeWithGeneric(IRBuilder& builder, IRInst* genericToSpecailize, IRInst* userGeneric)
{
if (auto gen = as<IRGeneric>(userGeneric))
{
if (auto toSpecialize = as<IRGeneric>(genericToSpecailize))
{
return specializeWithGeneric(builder, toSpecialize, gen);
}
}
return genericToSpecailize;
}
IRInst* hoistValueFromGeneric(IRBuilder& inBuilder, IRInst* value, IRInst*& outSpecializedVal, bool replaceExistingValue)
{
auto outerGeneric = as<IRGeneric>(findOuterGeneric(value));
if (!outerGeneric) return value;
IRBuilder builder = inBuilder;
builder.setInsertBefore(outerGeneric);
auto newGeneric = builder.emitGeneric();
builder.setInsertInto(newGeneric);
builder.emitBlock();
IRInst* newResultVal = nullptr;
// Clone insts in outerGeneric up until `value`.
IRCloneEnv cloneEnv;
for (auto inst : outerGeneric->getFirstBlock()->getChildren())
{
auto newInst = cloneInst(&cloneEnv, &builder, inst);
if (inst == value)
{
builder.emitReturn(newInst);
newResultVal = newInst;
break;
}
}
SLANG_RELEASE_ASSERT(newResultVal);
if (newResultVal->getOp() == kIROp_Func)
{
IRBuilder subBuilder = builder;
IRInst* subOutSpecialized = nullptr;
auto genericFuncType = hoistValueFromGeneric(subBuilder, newResultVal->getFullType(), subOutSpecialized, false);
newGeneric->setFullType((IRType*)genericFuncType);
}
else
{
newGeneric->setFullType(builder.getTypeKind());
}
if (replaceExistingValue)
{
builder.setInsertBefore(value);
outSpecializedVal = specializeWithGeneric(builder, newGeneric, outerGeneric);
value->replaceUsesWith(outSpecializedVal);
value->removeAndDeallocate();
}
eliminateDeadCode(newGeneric);
return newGeneric;
}
void moveInstChildren(IRInst* dest, IRInst* src)
{
for (auto child = dest->getFirstDecorationOrChild(); child; )
{
auto next = child->getNextInst();
child->removeAndDeallocate();
child = next;
}
for (auto child = src->getFirstDecorationOrChild(); child; )
{
auto next = child->getNextInst();
child->insertAtEnd(dest);
child = next;
}
}
}
|
