annotate dmd/SliceExp.d @ 135:af1bebfd96a4 dmd2037

dmd 2.038
author Eldar Insafutdinov <e.insafutdinov@gmail.com>
date Mon, 13 Sep 2010 22:19:42 +0100
parents 60bb0fe4563e
children e3afd1303184
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
1 module dmd.SliceExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
2
114
e28b18c23469 added a module dmd.common for commonly used stuff
Trass3r
parents: 84
diff changeset
3 import dmd.common;
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
4 import dmd.Expression;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
5 import dmd.expression.ArrayLength;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
6 import dmd.backend.elem;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
7 import dmd.UnaExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
8 import dmd.Identifier;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
9 import dmd.IdentifierExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
10 import dmd.ArrayExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
11 import dmd.STC;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
12 import dmd.InterState;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
13 import dmd.ScopeDsymbol;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
14 import dmd.WANT;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
15 import dmd.ArrayScopeSymbol;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
16 import dmd.CallExp;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
17 import dmd.DotIdExp;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
18 import dmd.Id;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
19 import dmd.expression.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
20 import dmd.TypeTuple;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
21 import dmd.TupleExp;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
22 import dmd.TypeStruct;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
23 import dmd.TypeClass;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
24 import dmd.TY;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
25 import dmd.Type;
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
26 import dmd.AggregateDeclaration;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
27 import dmd.OutBuffer;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
28 import dmd.Loc;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
29 import dmd.Scope;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
30 import dmd.InlineCostState;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
31 import dmd.VarDeclaration;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
32 import dmd.ErrorExp;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
33 import dmd.TypeExp;
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
34 import dmd.Parameter;
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
35 import dmd.ExpInitializer;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
36 import dmd.IRState;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
37 import dmd.InlineDoState;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
38 import dmd.ArrayTypes;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
39 import dmd.HdrGenState;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
40 import dmd.InlineScanState;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
41 import dmd.TOK;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
42 import dmd.TypeSArray;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
43 import dmd.GlobalExpressions;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
44 import dmd.Global;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
45 import dmd.PREC;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
46
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
47 import dmd.expression.Slice;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
48 import dmd.expression.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
49
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
50 import dmd.backend.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
51 import dmd.backend.Symbol;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
52 import dmd.backend.OPER;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
53 import dmd.backend.TYM;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
54 import dmd.codegen.Util;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
55
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
56 import core.stdc.string;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
57
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
58 class SliceExp : UnaExp
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
59 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
60 Expression upr; // null if implicit 0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
61 Expression lwr; // null if implicit [length - 1]
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
62
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
63 VarDeclaration lengthVar = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
64
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
65 this(Loc loc, Expression e1, Expression lwr, Expression upr)
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
66 {
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
67 super(loc, TOK.TOKslice, SliceExp.sizeof, e1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
68 this.upr = upr;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
69 this.lwr = lwr;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
70 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
71
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
72 override Expression syntaxCopy()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
73 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
74 Expression lwr = null;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
75 if (this.lwr)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
76 lwr = this.lwr.syntaxCopy();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
77
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
78 Expression upr = null;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
79 if (this.upr)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
80 upr = this.upr.syntaxCopy();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
81
53
a8b50ff7f201 ForeachStatement.syntaxCopy
korDen
parents: 12
diff changeset
82 return new SliceExp(loc, e1.syntaxCopy(), lwr, upr);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
83 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
84
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
85 override Expression semantic(Scope sc)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
86 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
87 Expression e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
88 AggregateDeclaration ad;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
89 //FuncDeclaration fd;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
90 ScopeDsymbol sym;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
91
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
92 version (LOGSEMANTIC) {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
93 printf("SliceExp.semantic('%s')\n", toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
94 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
95 if (type)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
96 return this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
97
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
98 UnaExp.semantic(sc);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
99 e1 = resolveProperties(sc, e1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
100
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
101 e = this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
102
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
103 Type t = e1.type.toBasetype();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
104 if (t.ty == Tpointer)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
105 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
106 if (!lwr || !upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
107 error("need upper and lower bound to slice pointer");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
108 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
109 else if (t.ty == Tarray)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
110 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
111 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
112 else if (t.ty == Tsarray)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
113 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
114 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
115 else if (t.ty == Tclass)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
116 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
117 ad = (cast(TypeClass)t).sym;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
118 goto L1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
119 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
120 else if (t.ty == Tstruct)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
121 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
122 ad = (cast(TypeStruct)t).sym;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
123
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
124 L1:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
125 if (search_function(ad, Id.slice))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
126 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
127 // Rewrite as e1.slice(lwr, upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
128 e = new DotIdExp(loc, e1, Id.slice);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
129
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
130 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
131 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
132 assert(upr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
133 e = new CallExp(loc, e, lwr, upr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
134 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
135 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
136 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
137 assert(!upr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
138 e = new CallExp(loc, e);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
139 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
140 e = e.semantic(sc);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
141 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
142 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
143 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
144 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
145 else if (t.ty == Ttuple)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
146 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
147 if (!lwr && !upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
148 return e1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
149 if (!lwr || !upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
150 { error("need upper and lower bound to slice tuple");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
151 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
152 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
153 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
154 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
155 goto Lerror;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
156
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
157 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
158 Scope sc2 = sc;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
159 if (t.ty == Tsarray || t.ty == Tarray || t.ty == Ttuple)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
160 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
161 sym = new ArrayScopeSymbol(sc, this);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
162 sym.loc = loc;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
163 sym.parent = sc.scopesym;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
164 sc2 = sc.push(sym);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
165 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
166
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
167 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
168 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
169 lwr = lwr.semantic(sc2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
170 lwr = resolveProperties(sc2, lwr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
171 lwr = lwr.implicitCastTo(sc2, Type.tsize_t);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
172 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
173 if (upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
174 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
175 upr = upr.semantic(sc2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
176 upr = resolveProperties(sc2, upr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
177 upr = upr.implicitCastTo(sc2, Type.tsize_t);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
178 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
179
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
180 if (sc2 != sc)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
181 sc2.pop();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
182 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
183
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
184 if (t.ty == Ttuple)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
185 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
186 lwr = lwr.optimize(WANTvalue);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
187 upr = upr.optimize(WANTvalue);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
188 ulong i1 = lwr.toUInteger();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
189 ulong i2 = upr.toUInteger();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
190
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
191 size_t length;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
192 TupleExp te;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
193 TypeTuple tup;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
194
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
195 if (e1.op == TOKtuple) // slicing an expression tuple
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
196 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
197 te = cast(TupleExp)e1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
198 length = te.exps.dim;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
199 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
200 else if (e1.op == TOKtype) // slicing a type tuple
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
201 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
202 tup = cast(TypeTuple)t;
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
203 length = Parameter.dim(tup.arguments);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
204 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
205 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
206 assert(0);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
207
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
208 if (i1 <= i2 && i2 <= length)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
209 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
210 size_t j1 = cast(size_t) i1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
211 size_t j2 = cast(size_t) i2;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
212
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
213 if (e1.op == TOKtuple)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
214 {
84
be2ab491772e Expressions -> Vector!Expression
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 72
diff changeset
215 auto exps = new Expressions;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
216 exps.setDim(j2 - j1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
217 for (size_t i = 0; i < j2 - j1; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
218 {
84
be2ab491772e Expressions -> Vector!Expression
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 72
diff changeset
219 auto e2 = te.exps[j1 + i];
be2ab491772e Expressions -> Vector!Expression
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 72
diff changeset
220 exps[i] = e2;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
221 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
222 e = new TupleExp(loc, exps);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
223 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
224 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
225 {
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
226 auto args = new Parameters;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
227 args.reserve(j2 - j1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
228 for (size_t i = j1; i < j2; i++)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
229 {
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
230 auto arg = Parameter.getNth(tup.arguments, i);
126
1765f3ef917d ClassDeclarations, Arguments -> Vector
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 114
diff changeset
231 args.push(arg);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
232 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
233 e = new TypeExp(e1.loc, new TypeTuple(args));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
234 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
235 e = e.semantic(sc);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
236 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
237 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
238 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
239 error("string slice [%ju .. %ju] is out of bounds", i1, i2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
240 e = new ErrorExp();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
241 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
242 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
243 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
244
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
245 if (t.ty == Tarray)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
246 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
247 type = e1.type;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
248 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
249 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
250 type = t.nextOf().arrayOf();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
251 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
252
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
253 Lerror:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
254 string s;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
255 if (t.ty == Tvoid)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
256 s = e1.toChars();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
257 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
258 s = t.toChars();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
259 error("%s cannot be sliced with []", s);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
260 e = new ErrorExp();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
261 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
262 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
263
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
264 override void checkEscape()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
265 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
266 e1.checkEscape();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
267 }
135
af1bebfd96a4 dmd 2.038
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 130
diff changeset
268
af1bebfd96a4 dmd 2.038
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 130
diff changeset
269 override void checkEscapeRef()
af1bebfd96a4 dmd 2.038
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 130
diff changeset
270 {
af1bebfd96a4 dmd 2.038
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 130
diff changeset
271 e1.checkEscapeRef();
af1bebfd96a4 dmd 2.038
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 130
diff changeset
272 }
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
273
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
274 version (DMDV2) {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
275 override int isLvalue()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
276 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
277 return 1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
278 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
279 }
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
280 override Expression toLvalue(Scope sc, Expression e)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
281 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
282 return this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
283 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
284
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
285 override Expression modifiableLvalue(Scope sc, Expression e)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
286 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
287 error("slice expression %s is not a modifiable lvalue", toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
288 return this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
289 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
290
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
291 override void toCBuffer(OutBuffer buf, HdrGenState* hgs)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
292 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
293 expToCBuffer(buf, hgs, e1, precedence[op]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
294 buf.writeByte('[');
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
295 if (upr || lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
296 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
297 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
298 expToCBuffer(buf, hgs, lwr, PREC.PREC_assign);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
299 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
300 buf.writeByte('0');
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
301 buf.writestring("..");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
302 if (upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
303 expToCBuffer(buf, hgs, upr, PREC.PREC_assign);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
304 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
305 buf.writestring("length"); // BUG: should be array.length
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
306 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
307 buf.writeByte(']');
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
308 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
309
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
310 override Expression optimize(int result)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
311 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
312 Expression e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
313
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
314 //printf("SliceExp::optimize(result = %d) %s\n", result, toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
315 e = this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
316 e1 = e1.optimize(WANTvalue | (result & WANTinterpret));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
317 if (!lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
318 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
319 if (e1.op == TOKstring)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
320 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
321 // Convert slice of string literal into dynamic array
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
322 Type t = e1.type.toBasetype();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
323 if (t.nextOf())
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
324 e = e1.castTo(null, t.nextOf().arrayOf());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
325 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
326 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
327 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
328 e1 = fromConstInitializer(result, e1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
329 lwr = lwr.optimize(WANTvalue | (result & WANTinterpret));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
330 upr = upr.optimize(WANTvalue | (result & WANTinterpret));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
331 e = Slice(type, e1, lwr, upr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
332 if (e is EXP_CANT_INTERPRET)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
333 e = this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
334 //printf("-SliceExp::optimize() %s\n", e->toChars());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
335 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
336 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
337
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
338 override Expression interpret(InterState istate)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
339 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
340 Expression e;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
341 Expression e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
342 Expression lwr;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
343 Expression upr;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
344
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
345 version (LOG) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
346 printf("SliceExp.interpret() %s\n", toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
347 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
348 e1 = this.e1.interpret(istate);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
349 if (e1 is EXP_CANT_INTERPRET)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
350 goto Lcant;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
351 if (!this.lwr)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
352 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
353 e = e1.castTo(null, type);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
354 return e.interpret(istate);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
355 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
356
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
357 /* Set the $ variable
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
358 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
359 e = ArrayLength(Type.tsize_t, e1);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
360 if (e is EXP_CANT_INTERPRET)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
361 goto Lcant;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
362 if (lengthVar)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
363 lengthVar.value = e;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
364
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
365 /* Evaluate lower and upper bounds of slice
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
366 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
367 lwr = this.lwr.interpret(istate);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
368 if (lwr is EXP_CANT_INTERPRET)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
369 goto Lcant;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
370 upr = this.upr.interpret(istate);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
371 if (upr is EXP_CANT_INTERPRET)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
372 goto Lcant;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
373
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
374 return Slice(type, e1, lwr, upr);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
375
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
376 Lcant:
63
cab4c37afb89 A bunch of implementations
korDen
parents: 53
diff changeset
377 return EXP_CANT_INTERPRET;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
378 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
379
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
380 override void dump(int indent)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
381 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
382 assert(false);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
383 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
384
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
385 override elem* toElem(IRState* irs)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
386 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
387 //printf("SliceExp.toElem()\n");
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
388 auto t1 = e1.type.toBasetype();
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
389 auto e = e1.toElem(irs);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
390 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
391 {
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
392 auto einit = resolveLengthVar(lengthVar, &e, t1);
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
393
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
394 int sz = cast(uint)t1.nextOf().size();
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
395
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
396 auto elwr = lwr.toElem(irs);
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
397 auto eupr = upr.toElem(irs);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
398
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
399 auto elwr2 = el_same(&elwr);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
400
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
401 // Create an array reference where:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
402 // length is (upr - lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
403 // pointer is (ptr + lwr*sz)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
404 // Combine as (length pair ptr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
405
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
406 if (irs.arrayBoundsCheck())
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
407 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
408 // Checks (unsigned compares):
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
409 // upr <= array.length
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
410 // lwr <= upr
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
411
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
412 elem *c1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
413 elem *c2;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
414 elem *ea;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
415 elem *eb;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
416 elem *eupr2;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
417 elem *elength;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
418
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
419 if (t1.ty == Tpointer)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
420 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
421 // Just do lwr <= upr check
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
422
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
423 eupr2 = el_same(&eupr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
424 eupr2.Ety = TYuint; // make sure unsigned comparison
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
425 c1 = el_bin(OPle, TYint, elwr2, eupr2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
426 c1 = el_combine(eupr, c1);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
427 goto L2;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
428 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
429 else if (t1.ty == Tsarray)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
430 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
431 TypeSArray tsa = cast(TypeSArray)t1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
432 ulong length = tsa.dim.toInteger();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
433
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
434 elength = el_long(TYuint, length);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
435 goto L1;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
436 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
437 else if (t1.ty == Tarray)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
438 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
439 if (lengthVar)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
440 elength = el_var(lengthVar.toSymbol());
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
441 else
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
442 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
443 elength = e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
444 e = el_same(&elength);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
445 elength = el_una(OP64_32, TYuint, elength);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
446 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
447 L1:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
448 eupr2 = el_same(&eupr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
449 c1 = el_bin(OPle, TYint, eupr, elength);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
450 eupr2.Ety = TYuint; // make sure unsigned comparison
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
451 c2 = el_bin(OPle, TYint, elwr2, eupr2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
452 c1 = el_bin(OPandand, TYint, c1, c2); // (c1 && c2)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
453
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
454 L2:
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
455 // Construct: (c1 || ModuleArray(line))
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
456 Symbol* sassert;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
457
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
458 sassert = irs.blx.module_.toModuleArray();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
459 ea = el_bin(OPcall,TYvoid,el_var(sassert), el_long(TYint, loc.linnum));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
460 eb = el_bin(OPoror,TYvoid,c1,ea);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
461 elwr = el_combine(elwr, eb);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
462
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
463 elwr2 = el_copytree(elwr2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
464 eupr = el_copytree(eupr2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
465 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
466 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
467
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
468 auto eptr = array_toPtr(e1.type, e);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
469
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
470 elem *elength = el_bin(OPmin, TYint, eupr, elwr2);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
471 eptr = el_bin(OPadd, TYnptr, eptr, el_bin(OPmul, TYint, el_copytree(elwr2), el_long(TYint, sz)));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
472
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
473 e = el_pair(TYullong, elength, eptr);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
474 e = el_combine(elwr, e);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
475 e = el_combine(einit, e);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
476 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
477 else if (t1.ty == Tsarray)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
478 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
479 e = sarray_toDarray(loc, t1, null, e);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
480 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
481
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
482 el_setLoc(e,loc);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
483 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
484 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
485
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
486 override void scanForNestedRef(Scope sc)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
487 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
488 e1.scanForNestedRef(sc);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
489
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
490 if (lengthVar)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
491 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
492 //printf("lengthVar\n");
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
493 lengthVar.parent = sc.parent;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
494 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
495 if (lwr)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
496 lwr.scanForNestedRef(sc);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
497 if (upr)
64
4290d870944a More fixes
korDen
parents: 63
diff changeset
498 upr.scanForNestedRef(sc);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
499 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
500
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
501 override void buildArrayIdent(OutBuffer buf, Expressions arguments)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
502 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
503 buf.writestring("Slice");
84
be2ab491772e Expressions -> Vector!Expression
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 72
diff changeset
504 arguments.shift(this);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
505 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
506
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
507 override Expression buildArrayLoop(Parameters fparams)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
508 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
509 Identifier id = Identifier.generateId("p", fparams.dim);
130
60bb0fe4563e dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 126
diff changeset
510 auto param = new Parameter(STCconst, type, id, null);
126
1765f3ef917d ClassDeclarations, Arguments -> Vector
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 114
diff changeset
511 fparams.shift(param);
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
512 Expression e = new IdentifierExp(Loc(0), id);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
513 Expressions arguments = new Expressions();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
514 Expression index = new IdentifierExp(Loc(0), Id.p);
84
be2ab491772e Expressions -> Vector!Expression
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents: 72
diff changeset
515 arguments.push(index);
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
516 e = new ArrayExp(Loc(0), e, arguments);
12
832f71e6f96c *Exp and *AssignExp arrayOp implementation added (might be a bit incomplete)
korDen
parents: 0
diff changeset
517 return e;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
518 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
519
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
520 override int inlineCost(InlineCostState* ics)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
521 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
522 int cost = 1 + e1.inlineCost(ics);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
523 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
524 cost += lwr.inlineCost(ics);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
525 if (upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
526 cost += upr.inlineCost(ics);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
527 return cost;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
528 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
529
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
530 override Expression doInline(InlineDoState ids)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
531 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
532 SliceExp are = cast(SliceExp)copy();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
533
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
534 are.e1 = e1.doInline(ids);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
535
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
536 if (lengthVar)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
537 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
538 //printf("lengthVar\n");
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
539 VarDeclaration vd = lengthVar;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
540 ExpInitializer ie;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
541 ExpInitializer ieto;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
542 VarDeclaration vto;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
543
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
544 vto = new VarDeclaration(vd.loc, vd.type, vd.ident, vd.init);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
545 ///*vto = *vd;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
546 memcpy(cast(void*)vto, cast(void*)vd, VarDeclaration.classinfo.init.length);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
547
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
548 vto.parent = ids.parent;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
549 vto.csym = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
550 vto.isym = null;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
551
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
552 ids.from.push(cast(void*)vd);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
553 ids.to.push(cast(void*)vto);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
554
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
555 if (vd.init)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
556 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
557 ie = vd.init.isExpInitializer();
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
558 assert(ie);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
559 ieto = new ExpInitializer(ie.loc, ie.exp.doInline(ids));
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
560 vto.init = ieto;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
561 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
562
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
563 are.lengthVar = vto;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
564 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
565
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
566 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
567 are.lwr = lwr.doInline(ids);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
568 if (upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
569 are.upr = upr.doInline(ids);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
570 return are;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
571 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
572
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 64
diff changeset
573 override Expression inlineScan(InlineScanState* iss)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
574 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
575 e1 = e1.inlineScan(iss);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
576 if (lwr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
577 lwr = lwr.inlineScan(iss);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
578 if (upr)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
579 upr = upr.inlineScan(iss);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
580 return this;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
581 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
582 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
583