Mercurial > projects > ddmd
annotate dmd/expression/Add.d @ 192:eb38fdcb3e62 default tip
updated to compile with dmd2.062
author | korDen |
---|---|
date | Sat, 02 Mar 2013 01:25:52 -0800 |
parents | 52188e7e3fb5 |
children |
rev | line source |
---|---|
0 | 1 module dmd.expression.Add; |
2 | |
114 | 3 import dmd.common; |
0 | 4 import dmd.Expression; |
5 import dmd.Type; | |
6 import dmd.Loc; | |
7 import dmd.RealExp; | |
8 import dmd.ComplexExp; | |
9 import dmd.IntegerExp; | |
10 import dmd.TOK; | |
11 import dmd.SymOffExp; | |
12 import dmd.Complex; | |
16
5c9b78899f5d
Implemented methods for Tuples, fixed some linking issues.
Robert Clipsham <robert@octarineparrot.com>
parents:
0
diff
changeset
|
13 import dmd.Util : printf; |
0 | 14 |
15 Expression Add(Type type, Expression e1, Expression e2) | |
16 { | |
17 Expression e; | |
18 Loc loc = e1.loc; | |
19 | |
20 version (LOG) { | |
21 printf("Add(e1 = %s, e2 = %s)\n", e1.toChars(), e2.toChars()); | |
22 } | |
23 if (type.isreal()) | |
24 { | |
25 e = new RealExp(loc, e1.toReal() + e2.toReal(), type); | |
26 } | |
27 else if (type.isimaginary()) | |
28 { | |
29 e = new RealExp(loc, e1.toImaginary() + e2.toImaginary(), type); | |
30 } | |
31 else if (type.iscomplex()) | |
32 { | |
33 // This rigamarole is necessary so that -0.0 doesn't get | |
34 // converted to +0.0 by doing an extraneous add with +0.0 | |
35 Complex!(real) c1; | |
36 real r1; | |
37 real i1; | |
38 | |
39 Complex!(real) c2; | |
40 real r2; | |
41 real i2; | |
42 | |
43 Complex!(real) v; | |
44 int x; | |
45 | |
46 if (e1.type.isreal()) | |
47 { | |
48 r1 = e1.toReal(); | |
49 x = 0; | |
50 } | |
51 else if (e1.type.isimaginary()) | |
52 { | |
53 i1 = e1.toImaginary(); | |
54 x = 3; | |
55 } | |
56 else | |
57 { | |
58 c1 = e1.toComplex(); | |
59 x = 6; | |
60 } | |
61 | |
62 if (e2.type.isreal()) | |
63 { | |
64 r2 = e2.toReal(); | |
65 } | |
66 else if (e2.type.isimaginary()) | |
67 { | |
68 i2 = e2.toImaginary(); | |
69 x += 1; | |
70 } | |
71 else | |
72 { | |
73 c2 = e2.toComplex(); | |
74 x += 2; | |
75 } | |
76 | |
77 switch (x) | |
78 { | |
79 case 0+0: v = Complex!(real)(r1 + r2, 0); break; | |
80 case 0+1: v = Complex!(real)(r1, i2); break; | |
81 case 0+2: v = Complex!(real)(r1 + c2.re, c2.im); break; | |
82 case 3+0: v = Complex!(real)(r2, i1); break; | |
83 case 3+1: v = Complex!(real)(0, i1 + i2); break; | |
84 case 3+2: v = Complex!(real)(c2.re, i1 + c2.im); break; | |
85 case 6+0: v = Complex!(real)(c1.re + r2, c1.im); break; | |
86 case 6+1: v = Complex!(real)(c1.re, c1.im + i2); break; | |
87 case 6+2: v = Complex!(real)(c1.re + c2.re, c1.im + c2.im); break; | |
191
52188e7e3fb5
Fixed deprecated features, now compiles with DMD2.058
korDen@korDen-pc
parents:
114
diff
changeset
|
88 default: assert(false); |
0 | 89 } |
90 e = new ComplexExp(loc, v, type); | |
91 } | |
92 else if (e1.op == TOK.TOKsymoff) | |
93 { | |
94 SymOffExp soe = cast(SymOffExp)e1; | |
95 e = new SymOffExp(loc, soe.var, soe.offset + cast(uint)e2.toInteger()); | |
96 e.type = type; | |
97 } | |
98 else if (e2.op == TOK.TOKsymoff) | |
99 { | |
100 SymOffExp soe = cast(SymOffExp)e2; | |
101 e = new SymOffExp(loc, soe.var, soe.offset + cast(uint)e1.toInteger()); | |
102 e.type = type; | |
103 } | |
104 else | |
105 e = new IntegerExp(loc, e1.toInteger() + e2.toInteger(), type); | |
106 | |
107 return e; | |
16
5c9b78899f5d
Implemented methods for Tuples, fixed some linking issues.
Robert Clipsham <robert@octarineparrot.com>
parents:
0
diff
changeset
|
108 } |