Mercurial > projects > ddmd

annotate dmd/CastExp.d @ 73:ef02e2e203c2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updating to dmd2.033
author korDen
date Sat, 28 Aug 2010 19:42:41 +0400
parents 2e2a5c3f943a
children 43073c7c7769
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: 63
diff changeset
1 module dmd.CastExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
2
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
3 import dmd.Expression;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
4 import dmd.TY;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
5 import dmd.TypeStruct;
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
6 import dmd.ErrorExp;
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
7 import dmd.TypeExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
8 import dmd.DotIdExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
9 import dmd.CallExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
10 import dmd.Global;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
11 import dmd.Id;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
12 import dmd.Identifier;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
13 import dmd.BinExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
14 import dmd.backend.elem;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
15 import dmd.UnaExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
16 import dmd.VarExp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
17 import dmd.Token;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
18 import dmd.VarDeclaration;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
19 import dmd.InterState;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
20 import dmd.MATCH;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
21 import dmd.Type;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
22 import dmd.OutBuffer;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
23 import dmd.Loc;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
24 import dmd.Scope;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
25 import dmd.IntRange;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
26 import dmd.IRState;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
27 import dmd.ArrayTypes;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
28 import dmd.HdrGenState;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
29 import dmd.MOD;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
30 import dmd.TOK;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
31 import dmd.WANT;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
32 import dmd.ClassDeclaration;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
33
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
34 import dmd.Optimize;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
35 import dmd.PREC;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
36 import dmd.Cast;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
37
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
38 import dmd.backend.Util;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
39 import dmd.expression.Util;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
40 import dmd.backend.TYM;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
41 import dmd.backend.OPER;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
42 import dmd.codegen.Util;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
43 import dmd.backend.RTLSYM;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
44
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
45 class CastExp : UnaExp
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
46 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
47 // Possible to cast to one type while painting to another type
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
48 Type to; // type to cast to
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
49 MOD mod; // MODxxxxx
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
50
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
51 this(Loc loc, Expression e, Type t)
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
52 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
53 super(loc, TOK.TOKcast, CastExp.sizeof, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
54 to = t;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
55 this.mod = cast(MOD)~0;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
56 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
57
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
58 this(Loc loc, Expression e, MOD mod)
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
59 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
60 super(loc, TOK.TOKcast, CastExp.sizeof, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
61 to = null;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
62 this.mod = mod;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
63 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
64
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
65 override Expression syntaxCopy()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
66 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
67 return to ? new CastExp(loc, e1.syntaxCopy(), to.syntaxCopy())
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
68 : new CastExp(loc, e1.syntaxCopy(), mod);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
69 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
70
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
71 override Expression semantic(Scope sc)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
72 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
73 Expression e;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
74 BinExp b;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
75 UnaExp u;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
76
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
77 version (LOGSEMANTIC) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
78 printf("CastExp.semantic('%s')\n", toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
79 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
80
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
81 //static int x; assert(++x < 10);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
82
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
83 if (type)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
84 return this;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
85 super.semantic(sc);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
86 if (e1.type) // if not a tuple
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
87 {
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
88 e1 = resolveProperties(sc, e1);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
89
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
90 if (!to)
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
91 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
92 /* Handle cast(const) and cast(immutable), etc.
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
93 */
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
94 to = e1.type.castMod(mod);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
95 }
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
96 else
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
97 to = to.semantic(loc, sc);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
98
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
99 if (!to.equals(e1.type))
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
100 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
101 e = op_overload(sc);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
102 if (e)
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
103 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
104 return e.implicitCastTo(sc, to);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
105 }
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
106 }
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
107
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
108 Type t1b = e1.type.toBasetype();
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
109 Type tob = to.toBasetype();
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
110 if (tob.ty == TY.Tstruct &&
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
111 !tob.equals(t1b) &&
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
112 (cast(TypeStruct)tob).sym.search(Loc(0), Id.call, 0)
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
113 )
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
114 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
115 /* Look to replace:
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
116 * cast(S)t
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
117 * with:
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
118 * S(t)
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
119 */
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
120
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
121 // Rewrite as to.call(e1)
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
122 e = new TypeExp(loc, to);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
123 e = new DotIdExp(loc, e, Id.call);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
124 e = new CallExp(loc, e, e1);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
125 e = e.semantic(sc);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
126 return e;
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
127 }
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
128
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
129 // Struct casts are possible only when the sizes match
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
130 if (tob.ty == Tstruct || t1b.ty == Tstruct)
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
131 {
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
132 size_t fromsize = cast(size_t)t1b.size(loc);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
133 size_t tosize = cast(size_t)tob.size(loc);
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
134 if (fromsize != tosize)
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
135 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
136 error("cannot cast from %s to %s", e1.type.toChars(), to.toChars());
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
137 return new ErrorExp();
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
138 }
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
139 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
140 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
141 else if (!to)
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
142 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
143 error("cannot cast tuple");
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
144 to = Type.terror;
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
145 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
146
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
147 if (global.params.safe && !sc.module_.safe && !sc.intypeof)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
148 { // Disallow unsafe casts
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
149 Type tob = to.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
150 Type t1b = e1.type.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
151 if (!t1b.isMutable() && tob.isMutable())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
152 { // Cast not mutable to mutable
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
153 Lunsafe:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
154 error("cast from %s to %s not allowed in safe mode", e1.type.toChars(), to.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
155 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
156 else if (t1b.isShared() && !tob.isShared())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
157 // Cast away shared
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
158 goto Lunsafe;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
159 else if (tob.ty == TY.Tpointer)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
160 { if (t1b.ty != TY.Tpointer)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
161 goto Lunsafe;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
162 Type tobn = tob.nextOf().toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
163 Type t1bn = t1b.nextOf().toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
164
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
165 if (!t1bn.isMutable() && tobn.isMutable())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
166 // Cast away pointer to not mutable
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
167 goto Lunsafe;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
168
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
169 if (t1bn.isShared() && !tobn.isShared())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
170 // Cast away pointer to shared
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
171 goto Lunsafe;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
172
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
173 if (tobn.isTypeBasic() && tobn.size() < t1bn.size()) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
174 // Allow things like casting a long* to an int*
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
175 ;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
176 } else if (tobn.ty != TY.Tvoid) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
177 // Cast to a pointer other than void*
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
178 goto Lunsafe;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
179 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
180 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
181
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
182 // BUG: Check for casting array types, such as void[] to int*[]
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
183 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
184
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
185 e = e1.castTo(sc, to);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
186 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
187 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
188
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
189 override MATCH implicitConvTo(Type t)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
190 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
191 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
192 printf("CastExp::implicitConvTo(this=%s, type=%s, t=%s)\n", toChars(), type.toChars(), t.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
193 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
194 MATCH result = type.implicitConvTo(t);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
195
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
196 if (result == MATCHnomatch)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
197 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
198 if (t.isintegral() &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
199 e1.type.isintegral() &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
200 e1.implicitConvTo(t) != MATCHnomatch)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
201 result = MATCHconvert;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
202 else
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
203 result = Expression.implicitConvTo(t);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
204 }
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
205 return result;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
206 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
207
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
208 override IntRange getIntRange()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
209 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
210 IntRange ir;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
211 ir = e1.getIntRange();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
212 // Do sign extension
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
213 switch (e1.type.toBasetype().ty)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
214 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
215 case Tint8:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
216 if (ir.imax & 0x80)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
217 ir.imax |= 0xFFFFFFFFFFFFFF00UL;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
218 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
219 case Tint16:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
220 if (ir.imax & 0x8000)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
221 ir.imax |= 0xFFFFFFFFFFFF0000UL;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
222 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
223 case Tint32:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
224 if (ir.imax & 0x80000000)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
225 ir.imax |= 0xFFFFFFFF00000000UL;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
226 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
227 default:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
228 }
73
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
229
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
230 if (type.isintegral())
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
231 {
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
232 ir.imin &= type.sizemask();
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
233 ir.imax &= type.sizemask();
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
234 }
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
235
ef02e2e203c2 Updating to dmd2.033
korDen
parents: 72
diff changeset
236 //printf("CastExp: imin = x%llx, imax = x%llx\n", ir.imin, ir.imax);
53
a8b50ff7f201 ForeachStatement.syntaxCopy
korDen
parents: 12
diff changeset
237 return ir;
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
238 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
239
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
240 override Expression optimize(int result)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
241 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
242 //printf("CastExp.optimize(result = %d) %s\n", result, toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
243 //printf("from %s to %s\n", type.toChars(), to.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
244 //printf("from %s\n", type.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
245 //printf("e1.type %s\n", e1.type.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
246 //printf("type = %p\n", type);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
247 assert(type);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
248 TOK op1 = e1.op;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
249
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
250 Expression e1old = e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
251 e1 = e1.optimize(result);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
252 e1 = fromConstInitializer(result, e1);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
253
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
254 if (e1 == e1old &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
255 e1.op == TOK.TOKarrayliteral &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
256 type.toBasetype().ty == TY.Tpointer &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
257 e1.type.toBasetype().ty != TY.Tsarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
258 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
259 // Casting this will result in the same expression, and
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
260 // infinite loop because of Expression.implicitCastTo()
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
261 return this; // no change
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
262 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
263
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
264 if ((e1.op == TOK.TOKstring || e1.op == TOK.TOKarrayliteral) &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
265 (type.ty == TY.Tpointer || type.ty == TY.Tarray) &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
266 e1.type.nextOf().size() == type.nextOf().size()
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
267 )
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
268 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
269 Expression e = e1.castTo(null, type);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
270
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
271 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
272 printf(" returning1 %s\n", e.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
273 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
274 return e;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
275 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
276
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
277 if (e1.op == TOK.TOKstructliteral &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
278 e1.type.implicitConvTo(type) >= MATCH.MATCHconst)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
279 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
280 e1.type = type;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
281 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
282 printf(" returning2 %s\n", e1.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
283 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
284 return e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
285 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
286
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
287 /* The first test here is to prevent infinite loops
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
288 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
289 if (op1 != TOK.TOKarrayliteral && e1.op == TOK.TOKarrayliteral)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
290 return e1.castTo(null, to);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
291 if (e1.op == TOK.TOKnull &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
292 (type.ty == TY.Tpointer || type.ty == TY.Tclass || type.ty == TY.Tarray))
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
293 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
294 e1.type = type;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
295 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
296 printf(" returning3 %s\n", e1.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
297 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
298 return e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
299 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
300
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
301 if (result & WANT.WANTflags && type.ty == TY.Tclass && e1.type.ty == TY.Tclass)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
302 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
303 // See if we can remove an unnecessary cast
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
304 ClassDeclaration cdfrom;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
305 ClassDeclaration cdto;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
306 int offset;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
307
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
308 cdfrom = e1.type.isClassHandle();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
309 cdto = type.isClassHandle();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
310 if (cdto.isBaseOf(cdfrom, &offset) && offset == 0)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
311 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
312 e1.type = type;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
313 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
314 printf(" returning4 %s\n", e1.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
315 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
316 return e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
317 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
318 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
319
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
320 // We can convert 'head const' to mutable
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
321 if (to.constOf().equals(e1.type.constOf()))
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
322 // if (to.constConv(e1.type) >= MATCHconst)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
323 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
324 e1.type = type;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
325 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
326 printf(" returning5 %s\n", e1.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
327 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
328 return e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
329 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
330
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
331 Expression e;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
332
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
333 if (e1.isConst())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
334 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
335 if (e1.op == TOK.TOKsymoff)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
336 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
337 if (type.size() == e1.type.size() &&
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
338 type.toBasetype().ty != TY.Tsarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
339 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
340 e1.type = type;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
341 return e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
342 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
343 return this;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
344 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
345 if (to.toBasetype().ty == TY.Tvoid)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
346 e = this;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
347 else
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
348 e = Cast(type, to, e1);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
349 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
350 else
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
351 e = this;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
352 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
353 printf(" returning6 %s\n", e.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
354 }
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
355 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
356 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
357
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
358 override Expression interpret(InterState istate)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
359 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
360 assert(false);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
361 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
362
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
363 override bool checkSideEffect(int flag)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
364 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
365 assert(false);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
366 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
367
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
368 override void checkEscape()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
369 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
370 Type tb = type.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
371 if (tb.ty == TY.Tarray && e1.op == TOK.TOKvar && e1.type.toBasetype().ty ==TY.Tsarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
372 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
373 VarExp ve = cast(VarExp)e1;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
374 VarDeclaration v = ve.var.isVarDeclaration();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
375 if (v)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
376 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
377 if (!v.isDataseg() && !v.isParameter())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
378 error("escaping reference to local %s", v.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
379 }
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
380 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
381 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
382
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
383 override void toCBuffer(OutBuffer buf, HdrGenState* hgs)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
384 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
385 buf.writestring("cast(");
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
386 version (DMDV1) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
387 to.toCBuffer(buf, null, hgs);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
388 } else {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
389 if (to)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
390 to.toCBuffer(buf, null, hgs);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
391 else
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
392 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
393 switch (mod)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
394 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
395 case MODundefined:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
396 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
397 case MODconst:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
398 buf.writestring(Token.tochars[TOKconst]);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
399 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
400 case MODinvariant:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
401 buf.writestring(Token.tochars[TOKimmutable]);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
402 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
403 case MODshared:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
404 buf.writestring(Token.tochars[TOKshared]);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
405 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
406 case MODshared | MODconst:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
407 buf.writestring(Token.tochars[TOKshared]);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
408 buf.writeByte(' ');
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
409 buf.writestring(Token.tochars[TOKconst]);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
410 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
411 default:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
412 assert(0);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
413 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
414 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
415 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
416 buf.writeByte(')');
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
417 expToCBuffer(buf, hgs, e1, precedence[op]);
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
418 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
419
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
420 override void buildArrayIdent(OutBuffer buf, Expressions arguments)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
421 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
422 Type tb = type.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
423 if (tb.ty == Tarray || tb.ty == Tsarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
424 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
425 e1.buildArrayIdent(buf, arguments);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
426 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
427 else
12
832f71e6f96c *Exp and *AssignExp arrayOp implementation added (might be a bit incomplete)
korDen
parents: 0
diff changeset
428 Expression.buildArrayIdent(buf, arguments);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
429 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
430
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
431 override Expression buildArrayLoop(Arguments fparams)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
432 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
433 Type tb = type.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
434 if (tb.ty == Tarray || tb.ty == Tsarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
435 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
436 return e1.buildArrayLoop(fparams);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
437 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
438 else
12
832f71e6f96c *Exp and *AssignExp arrayOp implementation added (might be a bit incomplete)
korDen
parents: 0
diff changeset
439 return Expression.buildArrayLoop(fparams);
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
440 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
441
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
442 static int X(int fty, int tty) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
443 return ((fty) * TY.TMAX + (tty));
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
444 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
445
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
446 override elem* toElem(IRState* irs)
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
447 {
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
448 elem* e;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
449 TY fty;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
450 TY tty;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
451 tym_t ftym;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
452 tym_t ttym;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
453 OPER eop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
454 Type t;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
455 Type tfrom;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
456
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
457 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
458 printf("CastExp::toElem()\n");
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
459 print();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
460 printf("\tfrom: %s\n", e1.type.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
461 printf("\tto : %s\n", to.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
462 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
463
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
464 e = e1.toElem(irs);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
465 tfrom = e1.type.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
466 t = to.toBasetype(); // skip over typedef's
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
467 if (t.equals(tfrom))
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
468 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
469
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
470 fty = tfrom.ty;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
471 //printf("fty = %d\n", fty);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
472 tty = t.ty;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
473
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
474 if (tty == TY.Tpointer && fty == TY.Tarray
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
475 ///static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
476 /// && (t.next.ty == Tvoid || t.next.equals(e1.type.next))
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
477 ///}
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
478 )
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
479 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
480 if (e.Eoper == OPER.OPvar)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
481 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
482 // e1 . *(&e1 + 4)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
483 e = el_una(OPER.OPaddr, TYM.TYnptr, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
484 e = el_bin(OPER.OPadd, TYM.TYnptr, e, el_long(TYM.TYint, 4));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
485 e = el_una(OPER.OPind, t.totym(),e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
486 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
487 else
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
488 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
489 // e1 . (unsigned)(e1 >> 32)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
490 e = el_bin(OPER.OPshr, TYM.TYullong, e, el_long(TYM.TYint, 32));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
491 e = el_una(OPER.OP64_32, t.totym(), e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
492 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
493 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
494 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
495
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
496 if (tty == TY.Tpointer && fty == TY.Tsarray
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
497 ///static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
498 /// && (t.next.ty == Tvoid || t.next.equals(e1.type.next))
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
499 ///}
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
500 )
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
501 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
502 // e1 . &e1
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
503 e = el_una(OPER.OPaddr, TYM.TYnptr, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
504 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
505 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
506
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
507 // Convert from static array to dynamic array
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
508 if (tty == TY.Tarray && fty == TY.Tsarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
509 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
510 e = sarray_toDarray(loc, tfrom, t, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
511 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
512 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
513
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
514 // Convert from dynamic array to dynamic array
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
515 if (tty == TY.Tarray && fty == TY.Tarray)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
516 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
517 uint fsize = cast(uint)tfrom.nextOf().size();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
518 uint tsize = cast(uint)t.nextOf().size();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
519
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
520 if (fsize != tsize)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
521 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
522 elem* ep = el_params(e, el_long(TYM.TYint, fsize), el_long(TYM.TYint, tsize), null);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
523 e = el_bin(OPER.OPcall, type.totym(), el_var(rtlsym[RTLSYM.RTLSYM_ARRAYCAST]), ep);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
524 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
525 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
526 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
527
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
528 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
529 // Convert from dynamic array string literal to static array
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
530 if (tty == TY.Tsarray && fty == TY.Tarray && e1.op == TOK.TOKstring)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
531 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
532 goto Lret; // treat as a 'paint'
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
533 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
534 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
535
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
536 // Casting from base class to derived class requires a runtime check
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
537 if (fty == TY.Tclass && tty == TY.Tclass)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
538 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
539 // Casting from derived class to base class is a no-op
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
540 ClassDeclaration cdfrom;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
541 ClassDeclaration cdto;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
542 int offset;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
543 int rtl = RTLSYM.RTLSYM_DYNAMIC_CAST;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
544
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
545 cdfrom = tfrom.isClassHandle();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
546 cdto = t.isClassHandle();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
547 if (cdfrom.isInterfaceDeclaration())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
548 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
549 rtl = RTLSYM.RTLSYM_INTERFACE_CAST;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
550 if (cdfrom.isCPPinterface())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
551 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
552 if (cdto.isCPPinterface())
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
553 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
554 /* Casting from a C++ interface to a C++ interface
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
555 * is always a 'paint' operation
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
556 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
557 goto Lret; // no-op
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
558 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
559
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
560 /* Casting from a C++ interface to a class
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
561 * always results in null because there is no runtime
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
562 * information available to do it.
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
563 *
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
564 * Casting from a C++ interface to a non-C++ interface
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
565 * always results in null because there's no way one
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
566 * can be derived from the other.
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
567 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
568 e = el_bin(OPER.OPcomma, TYM.TYnptr, e, el_long(TYM.TYnptr, 0));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
569 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
570 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
571 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
572 if (cdto.isBaseOf(cdfrom, &offset) && offset != OFFSET_RUNTIME)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
573 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
574 /* The offset from cdfrom=>cdto is known at compile time.
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
575 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
576
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
577 //printf("offset = %d\n", offset);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
578 if (offset)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
579 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
580 /* Rewrite cast as (e ? e + offset : null)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
581 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
582 elem* etmp;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
583 elem* ex;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
584
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
585 if (e1.op == TOK.TOKthis)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
586 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
587 // Assume 'this' is never null, so skip null check
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
588 e = el_bin(OPER.OPadd, TYM.TYnptr, e, el_long(TYM.TYint, offset));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
589 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
590 else
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
591 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
592 etmp = el_same(&e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
593 ex = el_bin(OPER.OPadd, TYM.TYnptr, etmp, el_long(TYM.TYint, offset));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
594 ex = el_bin(OPER.OPcolon, TYM.TYnptr, ex, el_long(TYM.TYnptr, 0));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
595 e = el_bin(OPER.OPcond, TYM.TYnptr, e, ex);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
596 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
597 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
598 goto Lret; // no-op
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
599 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
600
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
601 /* The offset from cdfrom=>cdto can only be determined at runtime.
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
602 */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
603 elem* ep;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
604
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
605 ep = el_param(el_ptr(cdto.toSymbol()), e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
606 e = el_bin(OPER.OPcall, TYM.TYnptr, el_var(rtlsym[rtl]), ep);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
607 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
608 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
609
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
610 ftym = e.Ety;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
611 ttym = t.totym();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
612 if (ftym == ttym)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
613 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
614
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
615 switch (tty)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
616 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
617 case TY.Tpointer:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
618 if (fty == TY.Tdelegate)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
619 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
620 tty = TY.Tuns32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
621 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
622
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
623 case TY.Tchar:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
624 tty = TY.Tuns8;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
625 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
626 case TY.Twchar:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
627 tty = TY.Tuns16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
628 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
629 case TY.Tdchar:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
630 tty = TY.Tuns32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
631 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
632 case TY.Tvoid:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
633 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
634
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
635 case TY.Tbool:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
636 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
637 // Construct e?true:false
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
638 elem* eq;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
639
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
640 e = el_una(OPER.OPbool, ttym, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
641 goto Lret;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
642 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
643
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
644 default:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
645 break; ///
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
646 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
647
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
648 switch (fty)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
649 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
650 case TY.Tpointer: fty = TY.Tuns32; break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
651 case TY.Tchar: fty = TY.Tuns8; break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
652 case TY.Twchar: fty = TY.Tuns16; break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
653 case TY.Tdchar: fty = TY.Tuns32; break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
654 default: break; ///
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
655 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
656
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
657 Lagain:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
658 switch (X(fty,tty))
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
659 {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
660 static if (false) {
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
661 case X(TY.Tbit,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
662 case X(TY.Tbit,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
663 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
664 case X(TY.Tbit,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
665 case X(TY.Tbit,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
666 case X(TY.Tbit,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
667 case X(TY.Tbit,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
668 eop = OPu8_16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
669 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
670 case X(TY.Tbit,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
671 case X(TY.Tbit,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
672 case X(TY.Tbit,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
673 case X(TY.Tbit,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
674 case X(TY.Tbit,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
675 case X(TY.Tbit,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
676 case X(TY.Tbit,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
677 case X(TY.Tbit,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
678 e = el_una(OPER.OPu8_16, TYM.TYuint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
679 fty = TY.Tuns32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
680 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
681 case X(Tbit,Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
682 case X(Tbit,Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
683 case X(Tbit,Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
684 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
685 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
686 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
687
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
688 case X(TY.Tbool,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
689 case X(TY.Tbool,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
690 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
691 case X(TY.Tbool,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
692 case X(TY.Tbool,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
693 case X(TY.Tbool,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
694 case X(TY.Tbool,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
695 eop = OPER.OPu8_16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
696 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
697 case X(TY.Tbool,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
698 case X(TY.Tbool,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
699 case X(TY.Tbool,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
700 case X(TY.Tbool,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
701 case X(TY.Tbool,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
702 case X(TY.Tbool,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
703 case X(TY.Tbool,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
704 case X(TY.Tbool,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
705 e = el_una(OPER.OPu8_16, TYM.TYuint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
706 fty = TY.Tuns32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
707 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
708 case X(TY.Tbool,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
709 case X(TY.Tbool,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
710 case X(TY.Tbool,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
711 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
712
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
713 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
714
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
715 case X(TY.Tint8,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
716 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
717 case X(TY.Tint8,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
718 case X(TY.Tint8,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
719 case X(TY.Tint8,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
720 case X(TY.Tint8,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
721 eop = OPER.OPs8_16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
722 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
723 case X(TY.Tint8,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
724 case X(TY.Tint8,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
725 case X(TY.Tint8,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
726 case X(TY.Tint8,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
727 case X(TY.Tint8,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
728 case X(TY.Tint8,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
729 case X(TY.Tint8,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
730 case X(TY.Tint8,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
731 e = el_una(OPER.OPs8_16, TYM.TYint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
732 fty = TY.Tint32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
733 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
734 case X(TY.Tint8,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
735 case X(TY.Tint8,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
736 case X(TY.Tint8,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
737 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
738
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
739 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
740
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
741 case X(TY.Tuns8,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
742 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
743 case X(TY.Tuns8,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
744 case X(TY.Tuns8,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
745 case X(TY.Tuns8,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
746 case X(TY.Tuns8,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
747 eop = OPER.OPu8_16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
748 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
749 case X(TY.Tuns8,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
750 case X(TY.Tuns8,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
751 case X(TY.Tuns8,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
752 case X(TY.Tuns8,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
753 case X(TY.Tuns8,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
754 case X(TY.Tuns8,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
755 case X(TY.Tuns8,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
756 case X(TY.Tuns8,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
757 e = el_una(OPER.OPu8_16, TYM.TYuint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
758 fty = TY.Tuns32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
759 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
760 case X(TY.Tuns8,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
761 case X(TY.Tuns8,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
762 case X(TY.Tuns8,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
763 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
764
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
765 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
766
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
767 case X(TY.Tint16,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
768 case X(TY.Tint16,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
769 eop = OPER.OP16_8;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
770 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
771 case X(TY.Tint16,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
772 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
773 case X(TY.Tint16,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
774 case X(TY.Tint16,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
775 eop = OPER.OPs16_32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
776 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
777 case X(TY.Tint16,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
778 case X(TY.Tint16,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
779 e = el_una(OPER.OPs16_32, TYM.TYint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
780 fty = TY.Tint32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
781 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
782 case X(TY.Tint16,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
783 case X(TY.Tint16,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
784 case X(TY.Tint16,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
785 case X(TY.Tint16,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
786 case X(TY.Tint16,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
787 case X(TY.Tint16,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
788 e = el_una(OPER.OPs16_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
789 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
790 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
791 case X(TY.Tint16,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
792 case X(TY.Tint16,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
793 case X(TY.Tint16,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
794 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
795
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
796 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
797
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
798 case X(TY.Tuns16,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
799 case X(TY.Tuns16,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
800 eop = OPER.OP16_8;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
801 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
802 case X(TY.Tuns16,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
803 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
804 case X(TY.Tuns16,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
805 case X(TY.Tuns16,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
806 eop = OPER.OPu16_32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
807 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
808 case X(TY.Tuns16,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
809 case X(TY.Tuns16,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
810 case X(TY.Tuns16,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
811 case X(TY.Tuns16,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
812 case X(TY.Tuns16,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
813 case X(TY.Tuns16,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
814 case X(TY.Tuns16,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
815 case X(TY.Tuns16,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
816 e = el_una(OPER.OPu16_32, TYM.TYuint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
817 fty = TY.Tuns32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
818 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
819 case X(TY.Tuns16,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
820 case X(TY.Tuns16,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
821 case X(TY.Tuns16,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
822 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
823
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
824 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
825
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
826 case X(TY.Tint32,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
827 case X(TY.Tint32,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
828 e = el_una(OPER.OP32_16, TYM.TYshort, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
829 fty = TY.Tint16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
830 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
831 case X(TY.Tint32,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
832 case X(TY.Tint32,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
833 eop = OPER.OP32_16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
834 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
835 case X(TY.Tint32,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
836 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
837 case X(TY.Tint32,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
838 case X(TY.Tint32,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
839 eop = OPER.OPs32_64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
840 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
841 case X(TY.Tint32,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
842 case X(TY.Tint32,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
843 case X(TY.Tint32,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
844 case X(TY.Tint32,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
845 case X(TY.Tint32,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
846 case X(TY.Tint32,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
847 e = el_una(OPER.OPs32_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
848 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
849 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
850 case X(TY.Tint32,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
851 case X(TY.Tint32,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
852 case X(TY.Tint32,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
853 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
854
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
855 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
856
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
857 case X(TY.Tuns32,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
858 case X(TY.Tuns32,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
859 e = el_una(OPER.OP32_16, TYM.TYshort, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
860 fty = TY.Tuns16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
861 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
862 case X(TY.Tuns32,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
863 case X(TY.Tuns32,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
864 eop = OPER.OP32_16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
865 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
866 case X(TY.Tuns32,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
867 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
868 case X(TY.Tuns32,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
869 case X(TY.Tuns32,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
870 eop = OPER.OPu32_64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
871 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
872 case X(TY.Tuns32,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
873 case X(TY.Tuns32,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
874 case X(TY.Tuns32,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
875 case X(TY.Tuns32,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
876 case X(TY.Tuns32,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
877 case X(TY.Tuns32,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
878 e = el_una(OPER.OPu32_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
879 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
880 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
881 case X(TY.Tuns32,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
882 case X(TY.Tuns32,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
883 case X(TY.Tuns32,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
884 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
885
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
886 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
887
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
888 case X(TY.Tint64,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
889 case X(TY.Tint64,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
890 case X(TY.Tint64,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
891 case X(TY.Tint64,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
892 e = el_una(OPER.OP64_32, TYM.TYint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
893 fty = TY.Tint32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
894 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
895 case X(TY.Tint64,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
896 case X(TY.Tint64,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
897 eop = OPER.OP64_32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
898 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
899 case X(TY.Tint64,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
900 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
901 case X(TY.Tint64,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
902 case X(TY.Tint64,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
903 case X(TY.Tint64,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
904 case X(TY.Tint64,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
905 case X(TY.Tint64,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
906 case X(TY.Tint64,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
907 e = el_una(OPER.OPs64_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
908 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
909 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
910 case X(TY.Tint64,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
911 case X(TY.Tint64,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
912 case X(TY.Tint64,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
913 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
914
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
915 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
916
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
917 case X(TY.Tuns64,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
918 case X(TY.Tuns64,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
919 case X(TY.Tuns64,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
920 case X(TY.Tuns64,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
921 e = el_una(OPER.OP64_32, TYM.TYint, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
922 fty = TY.Tint32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
923 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
924 case X(TY.Tuns64,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
925 case X(TY.Tuns64,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
926 eop = OPER.OP64_32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
927 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
928 case X(TY.Tuns64,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
929 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
930 case X(TY.Tuns64,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
931 case X(TY.Tuns64,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
932 case X(TY.Tuns64,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
933 case X(TY.Tuns64,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
934 case X(TY.Tuns64,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
935 case X(TY.Tuns64,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
936 e = el_una(OPER.OPu64_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
937 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
938 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
939 case X(TY.Tuns64,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
940 case X(TY.Tuns64,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
941 case X(TY.Tuns64,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
942 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
943
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
944 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
945
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
946 case X(TY.Tfloat32,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
947 case X(TY.Tfloat32,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
948 case X(TY.Tfloat32,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
949 case X(TY.Tfloat32,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
950 case X(TY.Tfloat32,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
951 case X(TY.Tfloat32,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
952 case X(TY.Tfloat32,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
953 case X(TY.Tfloat32,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
954 case X(TY.Tfloat32,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
955 e = el_una(OPER.OPf_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
956 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
957 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
958 case X(TY.Tfloat32,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
959 eop = OPER.OPf_d;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
960 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
961 case X(TY.Tfloat32,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
962 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
963 case X(TY.Tfloat32,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
964 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
965 case X(TY.Tfloat32,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
966 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
967 case X(TY.Tfloat32,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
968 case X(TY.Tfloat32,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
969 case X(TY.Tfloat32,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
970 e = el_bin(OPER.OPadd,TYM.TYcfloat,el_long(TYM.TYifloat,0),e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
971 fty = TY.Tcomplex32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
972 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
973
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
974 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
975
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
976 case X(TY.Tfloat64,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
977 case X(TY.Tfloat64,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
978 e = el_una(OPER.OPd_s16, TYM.TYshort, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
979 fty = TY.Tint16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
980 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
981 case X(TY.Tfloat64,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
982 eop = OPER.OPd_s16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
983 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
984 case X(TY.Tfloat64,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
985 eop = OPER.OPd_u16;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
986 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
987 case X(TY.Tfloat64,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
988 eop = OPER.OPd_s32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
989 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
990 case X(TY.Tfloat64,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
991 eop = OPER.OPd_u32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
992 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
993 case X(TY.Tfloat64,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
994 eop = OPER.OPd_s64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
995 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
996 case X(TY.Tfloat64,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
997 eop = OPER.OPd_u64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
998 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
999 case X(TY.Tfloat64,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1000 eop = OPER.OPd_f;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1001 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1002 case X(TY.Tfloat64,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1003 eop = OPER.OPd_ld;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1004 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1005 case X(TY.Tfloat64,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1006 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1007 case X(TY.Tfloat64,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1008 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1009 case X(TY.Tfloat64,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1010 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1011 case X(TY.Tfloat64,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1012 case X(TY.Tfloat64,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1013 case X(TY.Tfloat64,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1014 e = el_bin(OPER.OPadd,TYM.TYcfloat,el_long(TYM.TYidouble,0),e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1015 fty = TY.Tcomplex64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1016 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1017
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1018 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1019
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1020 case X(TY.Tfloat80,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1021 case X(TY.Tfloat80,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1022 case X(TY.Tfloat80,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1023 case X(TY.Tfloat80,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1024 case X(TY.Tfloat80,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1025 case X(TY.Tfloat80,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1026 case X(TY.Tfloat80,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1027 case X(TY.Tfloat80,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1028 e = el_una(OPER.OPld_d, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1029 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1030 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1031 case X(TY.Tfloat80,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1032 eop = OPER.OPld_u64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1033 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1034 case X(TY.Tfloat80,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1035 eop = OPER.OPld_d;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1036 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1037 case X(TY.Tfloat80,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1038 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1039 case X(TY.Tfloat80,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1040 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1041 case X(TY.Tfloat80,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1042 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1043 case X(TY.Tfloat80,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1044 case X(TY.Tfloat80,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1045 case X(TY.Tfloat80,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1046 e = el_bin(OPER.OPadd,TYM.TYcldouble,e,el_long(TYM.TYildouble,0));
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1047 fty = TY.Tcomplex80;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1048 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1049
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1050 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1051
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1052 case X(TY.Timaginary32,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1053 case X(TY.Timaginary32,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1054 case X(TY.Timaginary32,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1055 case X(TY.Timaginary32,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1056 case X(TY.Timaginary32,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1057 case X(TY.Timaginary32,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1058 case X(TY.Timaginary32,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1059 case X(TY.Timaginary32,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1060 case X(TY.Timaginary32,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1061 case X(TY.Timaginary32,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1062 case X(TY.Timaginary32,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1063 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1064 case X(TY.Timaginary32,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1065 eop = OPER.OPf_d;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1066 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1067 case X(TY.Timaginary32,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1068 e = el_una(OPER.OPf_d, TYM.TYidouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1069 fty = TY.Timaginary64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1070 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1071 case X(TY.Timaginary32,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1072 case X(TY.Timaginary32,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1073 case X(TY.Timaginary32,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1074 e = el_bin(OPER.OPadd,TYM.TYcfloat,el_long(TYM.TYfloat,0),e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1075 fty = TY.Tcomplex32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1076 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1077
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1078 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1079
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1080 case X(TY.Timaginary64,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1081 case X(TY.Timaginary64,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1082 case X(TY.Timaginary64,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1083 case X(TY.Timaginary64,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1084 case X(TY.Timaginary64,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1085 case X(TY.Timaginary64,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1086 case X(TY.Timaginary64,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1087 case X(TY.Timaginary64,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1088 case X(TY.Timaginary64,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1089 case X(TY.Timaginary64,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1090 case X(TY.Timaginary64,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1091 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1092 case X(TY.Timaginary64,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1093 eop = OPER.OPd_f;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1094 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1095 case X(TY.Timaginary64,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1096 eop = OPER.OPd_ld;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1097 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1098 case X(TY.Timaginary64,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1099 case X(TY.Timaginary64,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1100 case X(TY.Timaginary64,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1101 e = el_bin(OPER.OPadd, TYM.TYcdouble, el_long(TYM.TYdouble,0), e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1102 fty = TY.Tcomplex64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1103 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1104
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1105 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1106
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1107 case X(TY.Timaginary80,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1108 case X(TY.Timaginary80,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1109 case X(TY.Timaginary80,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1110 case X(TY.Timaginary80,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1111 case X(TY.Timaginary80,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1112 case X(TY.Timaginary80,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1113 case X(TY.Timaginary80,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1114 case X(TY.Timaginary80,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1115 case X(TY.Timaginary80,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1116 case X(TY.Timaginary80,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1117 case X(TY.Timaginary80,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1118 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1119 case X(TY.Timaginary80,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1120 e = el_una(OPER.OPf_d, TYM.TYidouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1121 fty = TY.Timaginary64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1122 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1123 case X(TY.Timaginary80,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1124 eop = OPER.OPld_d;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1125 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1126 case X(TY.Timaginary80,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1127 case X(TY.Timaginary80,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1128 case X(TY.Timaginary80,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1129 e = el_bin(OPER.OPadd, TYM.TYcldouble, el_long(TYM.TYldouble,0), e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1130 fty = TY.Tcomplex80;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1131 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1132
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1133 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1134
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1135 case X(TY.Tcomplex32,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1136 case X(TY.Tcomplex32,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1137 case X(TY.Tcomplex32,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1138 case X(TY.Tcomplex32,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1139 case X(TY.Tcomplex32,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1140 case X(TY.Tcomplex32,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1141 case X(TY.Tcomplex32,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1142 case X(TY.Tcomplex32,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1143 case X(TY.Tcomplex32,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1144 case X(TY.Tcomplex32,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1145 case X(TY.Tcomplex32,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1146 e = el_una(OPER.OPc_r, TYM.TYfloat, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1147 fty = TY.Tfloat32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1148 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1149 case X(TY.Tcomplex32,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1150 case X(TY.Tcomplex32,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1151 case X(TY.Tcomplex32,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1152 e = el_una(OPER.OPc_i, TYM.TYifloat, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1153 fty = TY.Timaginary32;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1154 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1155 case X(TY.Tcomplex32,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1156 case X(TY.Tcomplex32,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1157 e = el_una(OPER.OPf_d, TYM.TYcdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1158 fty = TY.Tcomplex64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1159 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1160
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1161 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1162
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1163 case X(TY.Tcomplex64,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1164 case X(TY.Tcomplex64,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1165 case X(TY.Tcomplex64,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1166 case X(TY.Tcomplex64,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1167 case X(TY.Tcomplex64,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1168 case X(TY.Tcomplex64,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1169 case X(TY.Tcomplex64,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1170 case X(TY.Tcomplex64,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1171 case X(TY.Tcomplex64,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1172 case X(TY.Tcomplex64,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1173 case X(TY.Tcomplex64,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1174 e = el_una(OPER.OPc_r, TYM.TYdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1175 fty = TY.Tfloat64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1176 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1177 case X(TY.Tcomplex64,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1178 case X(TY.Tcomplex64,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1179 case X(TY.Tcomplex64,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1180 e = el_una(OPER.OPc_i, TYM.TYidouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1181 fty = TY.Timaginary64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1182 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1183 case X(TY.Tcomplex64,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1184 eop = OPER.OPd_f;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1185 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1186 case X(TY.Tcomplex64,TY.Tcomplex80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1187 eop = OPER.OPd_ld;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1188 goto Leop;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1189
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1190 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1191
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1192 case X(TY.Tcomplex80,TY.Tint8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1193 case X(TY.Tcomplex80,TY.Tuns8):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1194 case X(TY.Tcomplex80,TY.Tint16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1195 case X(TY.Tcomplex80,TY.Tuns16):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1196 case X(TY.Tcomplex80,TY.Tint32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1197 case X(TY.Tcomplex80,TY.Tuns32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1198 case X(TY.Tcomplex80,TY.Tint64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1199 case X(TY.Tcomplex80,TY.Tuns64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1200 case X(TY.Tcomplex80,TY.Tfloat32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1201 case X(TY.Tcomplex80,TY.Tfloat64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1202 case X(TY.Tcomplex80,TY.Tfloat80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1203 e = el_una(OPER.OPc_r, TYM.TYldouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1204 fty = TY.Tfloat80;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1205 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1206 case X(TY.Tcomplex80,TY.Timaginary32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1207 case X(TY.Tcomplex80,TY.Timaginary64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1208 case X(TY.Tcomplex80,TY.Timaginary80):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1209 e = el_una(OPER.OPc_i, TYM.TYildouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1210 fty = TY.Timaginary80;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1211 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1212 case X(TY.Tcomplex80,TY.Tcomplex32):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1213 case X(TY.Tcomplex80,TY.Tcomplex64):
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1214 e = el_una(OPER.OPld_d, TYM.TYcdouble, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1215 fty = TY.Tcomplex64;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1216 goto Lagain;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1217
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1218 /* ============================= */
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1219
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1220 default:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1221 if (fty == tty)
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1222 goto Lpaint;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1223 //dump(0);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1224 //printf("fty = %d, tty = %d\n", fty, tty);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1225 error("e2ir: cannot cast from %s to %s", e1.type.toChars(), t.toChars());
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1226 goto Lzero;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1227
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1228 Lzero:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1229 e = el_long(ttym, 0);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1230 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1231
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1232 Lpaint:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1233 e.Ety = ttym;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1234 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1235
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1236 Leop:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1237 e = el_una(eop, ttym, e);
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1238 break;
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1239 }
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1240 Lret:
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1241 // Adjust for any type paints
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1242 t = type.toBasetype();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1243 e.Ety = t.totym();
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1244
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1245 el_setLoc(e,loc);
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1246 return e;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1247 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1248
72
2e2a5c3f943a reduced warnings by adding override to the methods
Trass3r
parents: 63
diff changeset
1249 override Identifier opId()
0
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1250 {
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1251 return Id.cast_;
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1252 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1253 }
10317f0c89a5 Initial commit
korDen
parents:
diff changeset
1254