|
0
|
1 module dmd.TryFinallyStatement;
|
|
|
2
|
|
114
|
3 import dmd.common;
|
|
0
|
4 import dmd.Statement;
|
|
|
5 import dmd.Loc;
|
|
|
6 import dmd.OutBuffer;
|
|
|
7 import dmd.HdrGenState;
|
|
|
8 import dmd.Scope;
|
|
|
9 import dmd.InlineScanState;
|
|
|
10 import dmd.CompoundStatement;
|
|
|
11 import dmd.IRState;
|
|
|
12 import dmd.BE;
|
|
|
13
|
|
|
14 import dmd.backend.block;
|
|
|
15 import dmd.backend.Blockx;
|
|
|
16 import dmd.backend.BC;
|
|
|
17 import dmd.backend.Util;
|
|
|
18
|
|
|
19 import dmd.codegen.Util;
|
|
|
20
|
|
|
21 class TryFinallyStatement : Statement
|
|
|
22 {
|
|
|
23 Statement body_;
|
|
|
24 Statement finalbody;
|
|
|
25
|
|
|
26 this(Loc loc, Statement body_, Statement finalbody)
|
|
|
27 {
|
|
178
|
28 register();
|
|
0
|
29 super(loc);
|
|
|
30 this.body_ = body_;
|
|
|
31 this.finalbody = finalbody;
|
|
|
32 }
|
|
|
33
|
|
72
|
34 override Statement syntaxCopy()
|
|
0
|
35 {
|
|
|
36 assert(false);
|
|
|
37 }
|
|
|
38
|
|
72
|
39 override void toCBuffer(OutBuffer buf, HdrGenState* hgs)
|
|
0
|
40 {
|
|
174
|
41 buf.printf("try\n{\n");
|
|
|
42 body_.toCBuffer(buf, hgs);
|
|
|
43 buf.printf("}\nfinally\n{\n");
|
|
|
44 finalbody.toCBuffer(buf, hgs);
|
|
|
45 buf.writeByte('}');
|
|
|
46 buf.writenl();
|
|
0
|
47 }
|
|
|
48
|
|
72
|
49 override Statement semantic(Scope sc)
|
|
0
|
50 {
|
|
|
51 //printf("TryFinallyStatement::semantic()\n");
|
|
|
52 body_ = body_.semantic(sc);
|
|
|
53 sc = sc.push();
|
|
|
54 sc.tf = this;
|
|
|
55 sc.sbreak = null;
|
|
|
56 sc.scontinue = null; // no break or continue out of finally block
|
|
|
57 finalbody = finalbody.semantic(sc);
|
|
|
58 sc.pop();
|
|
|
59 if (!body_)
|
|
|
60 return finalbody;
|
|
|
61 if (!finalbody)
|
|
|
62 return body_;
|
|
|
63 if (body_.blockExit() == BE.BEfallthru)
|
|
|
64 {
|
|
|
65 Statement s = new CompoundStatement(loc, body_, finalbody);
|
|
|
66 return s;
|
|
|
67 }
|
|
|
68 return this;
|
|
|
69 }
|
|
|
70
|
|
72
|
71 override bool hasBreak()
|
|
0
|
72 {
|
|
|
73 assert(false);
|
|
|
74 }
|
|
|
75
|
|
72
|
76 override bool hasContinue()
|
|
0
|
77 {
|
|
|
78 assert(false);
|
|
|
79 }
|
|
|
80
|
|
72
|
81 override bool usesEH()
|
|
0
|
82 {
|
|
|
83 assert(false);
|
|
|
84 }
|
|
|
85
|
|
72
|
86 override BE blockExit()
|
|
0
|
87 {
|
|
|
88 if (body_)
|
|
|
89 return body_.blockExit();
|
|
|
90 return BE.BEfallthru;
|
|
|
91 }
|
|
|
92
|
|
72
|
93 override Statement inlineScan(InlineScanState* iss)
|
|
0
|
94 {
|
|
|
95 if (body_)
|
|
|
96 body_ = body_.inlineScan(iss);
|
|
|
97 if (finalbody)
|
|
|
98 finalbody = finalbody.inlineScan(iss);
|
|
|
99 return this;
|
|
|
100 }
|
|
|
101
|
|
|
102 /****************************************
|
|
|
103 * A try-finally statement.
|
|
|
104 * Builds the following:
|
|
|
105 * _try
|
|
|
106 * block
|
|
|
107 * _finally
|
|
|
108 * finalbody
|
|
|
109 * _ret
|
|
|
110 */
|
|
72
|
111 override void toIR(IRState* irs)
|
|
0
|
112 {
|
|
|
113 //printf("TryFinallyStatement.toIR()\n");
|
|
|
114 Blockx* blx = irs.blx;
|
|
|
115
|
|
|
116 version (SEH) {
|
|
|
117 nteh_declarvars(blx);
|
|
|
118 }
|
|
|
119
|
|
|
120 block* tryblock = block_goto(blx, BCgoto, null);
|
|
|
121
|
|
|
122 int previndex = blx.scope_index;
|
|
|
123 tryblock.Blast_index = previndex;
|
|
|
124 tryblock.Bscope_index = blx.next_index++;
|
|
|
125 blx.scope_index = tryblock.Bscope_index;
|
|
|
126
|
|
|
127 // Current scope index
|
|
|
128 setScopeIndex(blx,tryblock,tryblock.Bscope_index);
|
|
|
129
|
|
|
130 blx.tryblock = tryblock;
|
|
|
131 block_goto(blx,BC_try,null);
|
|
|
132
|
|
|
133 IRState bodyirs = IRState(irs, this);
|
|
|
134 block* breakblock = block_calloc(blx);
|
|
|
135 block* contblock = block_calloc(blx);
|
|
|
136
|
|
|
137 if (body_)
|
|
|
138 body_.toIR(&bodyirs);
|
|
|
139 blx.tryblock = tryblock.Btry; // back to previous tryblock
|
|
|
140
|
|
|
141 setScopeIndex(blx,blx.curblock,previndex);
|
|
|
142 blx.scope_index = previndex;
|
|
|
143
|
|
|
144 block_goto(blx,BCgoto, breakblock);
|
|
|
145 block* finallyblock = block_goto(blx,BCgoto,contblock);
|
|
|
146
|
|
|
147 list_append(&tryblock.Bsucc,finallyblock);
|
|
|
148
|
|
|
149 block_goto(blx,BC_finally,null);
|
|
|
150
|
|
|
151 IRState finallyState = IRState(irs, this);
|
|
|
152 breakblock = block_calloc(blx);
|
|
|
153 contblock = block_calloc(blx);
|
|
|
154
|
|
|
155 setScopeIndex(blx, blx.curblock, previndex);
|
|
|
156 if (finalbody)
|
|
|
157 finalbody.toIR(&finallyState);
|
|
|
158 block_goto(blx, BCgoto, contblock);
|
|
|
159 block_goto(blx, BCgoto, breakblock);
|
|
|
160
|
|
|
161 block* retblock = blx.curblock;
|
|
|
162 block_next(blx,BC_ret,null);
|
|
|
163
|
|
|
164 list_append(&finallyblock.Bsucc, blx.curblock);
|
|
|
165 list_append(&retblock.Bsucc, blx.curblock);
|
|
|
166 }
|
|
72
|
167 }
|
