Mercurial > projects > ddmd
annotate dmd/AddExp.d @ 157:b7b61140701d
* added all missing default cases in switch statements
+ Lexer.getDocComment
+ Lexer.combineComments
author | trass3r |
---|---|
date | Thu, 16 Sep 2010 01:34:10 +0200 |
parents | 60bb0fe4563e |
children | e3afd1303184 |
rev | line source |
---|---|
72 | 1 module dmd.AddExp; |
2 | |
114 | 3 import dmd.common; |
72 | 4 import dmd.Expression; |
5 import dmd.Identifier; | |
6 import dmd.backend.elem; | |
7 import dmd.InterState; | |
8 import dmd.OutBuffer; | |
9 import dmd.Loc; | |
10 import dmd.Id; | |
11 import dmd.Scope; | |
12 import dmd.IRState; | |
13 import dmd.ArrayTypes; | |
14 import dmd.BinExp; | |
15 import dmd.Type; | |
16 import dmd.TOK; | |
17 import dmd.TY; | |
18 | |
19 import dmd.expression.Add; | |
20 import dmd.backend.Util; | |
21 import dmd.backend.OPER; | |
22 | |
0 | 23 class AddExp : BinExp |
24 { | |
25 this(Loc loc, Expression e1, Expression e2) | |
26 { | |
27 super(loc, TOK.TOKadd, AddExp.sizeof, e1, e2); | |
28 } | |
29 | |
72 | 30 override Expression semantic(Scope sc) |
0 | 31 { |
72 | 32 Expression e; |
33 | |
34 version (LOGSEMANTIC) { | |
35 printf("AddExp.semantic('%s')\n", toChars()); | |
36 } | |
37 if (!type) | |
38 { | |
39 BinExp.semanticp(sc); | |
40 | |
41 e = op_overload(sc); | |
42 if (e) | |
43 return e; | |
44 | |
45 Type tb1 = e1.type.toBasetype(); | |
46 Type tb2 = e2.type.toBasetype(); | |
47 | |
48 if ((tb1.ty == TY.Tarray || tb1.ty == TY.Tsarray) && | |
49 (tb2.ty == TY.Tarray || tb2.ty == TY.Tsarray) && | |
50 tb1.nextOf().equals(tb2.nextOf()) | |
51 ) | |
52 { | |
53 type = e1.type; | |
54 e = this; | |
55 } | |
56 else if (tb1.ty == TY.Tpointer && e2.type.isintegral() || | |
57 tb2.ty == TY.Tpointer && e1.type.isintegral()) | |
58 e = scaleFactor(sc); | |
59 else if (tb1.ty == TY.Tpointer && tb2.ty == TY.Tpointer) | |
60 { | |
61 incompatibleTypes(); | |
62 type = e1.type; | |
63 e = this; | |
64 } | |
65 else | |
66 { | |
67 typeCombine(sc); | |
68 if ((e1.type.isreal() && e2.type.isimaginary()) || | |
69 (e1.type.isimaginary() && e2.type.isreal())) | |
70 { | |
71 switch (type.toBasetype().ty) | |
72 { | |
73 case TY.Tfloat32: | |
74 case TY.Timaginary32: | |
75 type = Type.tcomplex32; | |
76 break; | |
77 | |
78 case TY.Tfloat64: | |
79 case TY.Timaginary64: | |
80 type = Type.tcomplex64; | |
81 break; | |
82 | |
83 case TY.Tfloat80: | |
84 case TY.Timaginary80: | |
85 type = Type.tcomplex80; | |
86 break; | |
157
b7b61140701d
* added all missing default cases in switch statements
trass3r
parents:
130
diff
changeset
|
87 default: |
72 | 88 } |
89 } | |
90 e = this; | |
91 } | |
92 return e; | |
93 } | |
0 | 94 return this; |
95 } | |
96 | |
72 | 97 override Expression optimize(int result) |
0 | 98 { |
72 | 99 Expression e; |
100 | |
101 //printf("AddExp::optimize(%s)\n", toChars()); | |
102 e1 = e1.optimize(result); | |
103 e2 = e2.optimize(result); | |
104 if (e1.isConst() && e2.isConst()) | |
105 { | |
106 if (e1.op == TOK.TOKsymoff && e2.op == TOK.TOKsymoff) | |
107 return this; | |
108 e = Add(type, e1, e2); | |
109 } | |
110 else | |
111 e = this; | |
112 | |
0 | 113 return e; |
114 } | |
115 | |
72 | 116 override Expression interpret(InterState istate) |
0 | 117 { |
115
6caaf0256da1
+ interpretation of (non-assign) binary expressions
Trass3r
parents:
114
diff
changeset
|
118 return interpretCommon(istate, &Add); |
0 | 119 } |
120 | |
72 | 121 override void buildArrayIdent(OutBuffer buf, Expressions arguments) |
0 | 122 { |
12
832f71e6f96c
*Exp and *AssignExp arrayOp implementation added (might be a bit incomplete)
korDen
parents:
0
diff
changeset
|
123 Exp_buildArrayIdent(buf, arguments, "Add"); |
0 | 124 } |
125 | |
130
60bb0fe4563e
dmdfe 2.037 first main iteration
Eldar Insafutdinov <e.insafutdinov@gmail.com>
parents:
123
diff
changeset
|
126 override Expression buildArrayLoop(Parameters fparams) |
0 | 127 { |
123 | 128 return Exp_buildArrayLoop!(typeof(this))(fparams); |
0 | 129 } |
130 | |
72 | 131 override bool isCommutative() |
0 | 132 { |
133 return true; | |
134 } | |
135 | |
72 | 136 override Identifier opId() |
0 | 137 { |
138 return Id.add; | |
139 } | |
140 | |
72 | 141 override Identifier opId_r() |
0 | 142 { |
143 return Id.add_r; | |
144 } | |
145 | |
72 | 146 override elem* toElem(IRState* irs) |
0 | 147 { |
72 | 148 elem *e; |
149 Type tb1 = e1.type.toBasetype(); | |
150 Type tb2 = e2.type.toBasetype(); | |
151 | |
152 if ((tb1.ty == TY.Tarray || tb1.ty == TY.Tsarray) && (tb2.ty == TY.Tarray || tb2.ty == TY.Tsarray)) | |
153 { | |
154 error("Array operation %s not implemented", toChars()); | |
155 e = el_long(type.totym(), 0); // error recovery | |
156 } | |
157 else | |
158 e = toElemBin(irs, OPER.OPadd); | |
159 | |
0 | 160 return e; |
161 } | |
162 } | |
163 |