[32b8144] | 1 | //
|
---|
[5ead9f9] | 2 | // Cforall Version 1.0.0 Copyright (C) 2016 University of Waterloo
|
---|
| 3 | //
|
---|
| 4 | // The contents of this file are covered under the licence agreement in the
|
---|
| 5 | // file "LICENCE" distributed with Cforall.
|
---|
[32b8144] | 6 | //
|
---|
| 7 | // dtor-early-exit.c --
|
---|
| 8 | //
|
---|
[5ead9f9] | 9 | // Author : Rob Schluntz
|
---|
| 10 | // Created On : Wed Aug 17 08:26:25 2016
|
---|
| 11 | // Last Modified By : Peter A. Buhr
|
---|
[e765794] | 12 | // Last Modified On : Sat Aug 11 07:58:39 2018
|
---|
| 13 | // Update Count : 8
|
---|
[32b8144] | 14 | //
|
---|
[5ead9f9] | 15 |
|
---|
[5a5d31a] | 16 | #include <fstream.hfa>
|
---|
| 17 | #include <stdlib.hfa>
|
---|
[e765794] | 18 | #include <assert.h>
|
---|
[85f0713] | 19 |
|
---|
| 20 | struct A {
|
---|
[cdbfab0] | 21 | const char * name;
|
---|
[85f0713] | 22 | int * x;
|
---|
| 23 | };
|
---|
| 24 |
|
---|
| 25 | // don't want these called
|
---|
[2afec66] | 26 | void ?{}(A & a) { assert( false ); }
|
---|
| 27 | void ?{}(A & a, const char * name) { a.name = name; sout | "construct " | name | endl; a.x = (int*)malloc(); }
|
---|
| 28 | void ?{}(A & a, const char * name, int * ptr) { assert( false ); }
|
---|
[85f0713] | 29 |
|
---|
[2afec66] | 30 | A ?=?(A & a, A b) { sout | "assign " | a.name | " " | b.name; return a; }
|
---|
| 31 | void ?{}(A & a, A b) { sout | "copy construct " | b.name | endl; a.x = (int*)malloc(); }
|
---|
| 32 | void ^?{}(A & a) { sout | "destruct " | a.name | endl; free(a.x); }
|
---|
[85f0713] | 33 |
|
---|
| 34 | // test returns
|
---|
| 35 | void f(int i) {
|
---|
| 36 | sout | "f i=" | i | endl;
|
---|
| 37 | A x = { "x" }; // construct x
|
---|
| 38 | {
|
---|
| 39 | A y = { "y" }; // construct y
|
---|
| 40 | {
|
---|
| 41 | A z = { "z" }; // construct z
|
---|
| 42 | {
|
---|
| 43 | if (i == 0) return; // destruct x, y, z
|
---|
| 44 | }
|
---|
| 45 | if (i == 1) return; // destruct x, y, z
|
---|
| 46 | // destruct z
|
---|
| 47 | }
|
---|
| 48 | if (i == 2) return; // destruct x, y
|
---|
| 49 | // destruct y
|
---|
| 50 | }
|
---|
| 51 | return; // destruct x
|
---|
| 52 | }
|
---|
| 53 |
|
---|
| 54 | // test loops, switch, etc.
|
---|
| 55 | void g() {
|
---|
| 56 | for (int i = 0; i < 10; i++) {
|
---|
| 57 | sout | "g for i=" | i | endl;
|
---|
| 58 | A x = { "x" };
|
---|
| 59 | // construct x
|
---|
| 60 | // destruct x
|
---|
| 61 | }
|
---|
| 62 | sout | endl;
|
---|
| 63 | {
|
---|
| 64 | int i = 0;
|
---|
| 65 | while (i < 10) {
|
---|
| 66 | sout | "g while i=" | i | endl;
|
---|
| 67 | A x = { "x" };
|
---|
| 68 | // construct x
|
---|
| 69 | i++;
|
---|
| 70 | // destruct x
|
---|
| 71 | }
|
---|
| 72 | }
|
---|
| 73 | sout | endl;
|
---|
| 74 | for (int i = 0; i < 10; i++) {
|
---|
| 75 | switch(10) {
|
---|
| 76 | case 0:
|
---|
| 77 | case 5:
|
---|
| 78 | case 10: {
|
---|
| 79 | A y = { "y" };
|
---|
| 80 | sout | "g switch i=" | i | endl;
|
---|
| 81 | // construct y
|
---|
| 82 | break; // destruct y
|
---|
| 83 | }
|
---|
| 84 | default: {
|
---|
| 85 | sout | "g switch i=" | i | endl;
|
---|
| 86 | A x = { "x" };
|
---|
| 87 | // construct x
|
---|
| 88 | break; // destruct x
|
---|
| 89 | }
|
---|
| 90 | }
|
---|
| 91 | }
|
---|
| 92 | sout | endl;
|
---|
| 93 | for (int k = 0; k < 2; k++) {
|
---|
| 94 | sout | "g for k=" | k | endl;
|
---|
| 95 | L1: for (int i = 0; i < 10; i++) {
|
---|
| 96 | sout | "g for i=" | i | endl;
|
---|
| 97 |
|
---|
| 98 | A x = { "x" };
|
---|
| 99 | if (i == 2) {
|
---|
| 100 | sout | "continue L1" | endl;
|
---|
| 101 | continue; // destruct x
|
---|
| 102 | } else if (i == 3) {
|
---|
| 103 | sout | "break L1" | endl;
|
---|
| 104 | break; // destruct x
|
---|
| 105 | }
|
---|
| 106 |
|
---|
| 107 | L2: for (int j = 0; j < 10; j++) {
|
---|
| 108 | sout | "g for j=" | j | endl;
|
---|
| 109 | A y = { "y" };
|
---|
| 110 | if (j == 0) {
|
---|
| 111 | sout | "continue L2" | endl;
|
---|
| 112 | continue; // destruct y - missing because object that needs to be destructed is not a part of this block, it's a part of the for's block
|
---|
| 113 | } else if (j == 1) {
|
---|
| 114 | sout | "break L2" | endl;
|
---|
| 115 | break; // destruct y
|
---|
| 116 | } else if (i == 1) {
|
---|
| 117 | sout | "continue L1" | endl;
|
---|
| 118 | continue L1; // destruct x,y - note: continue takes you to destructors for block, so only generate destructor for y
|
---|
| 119 | } else if (k == 1) {
|
---|
| 120 | sout | "break L1" | endl;
|
---|
| 121 | break L1; // destruct x,y
|
---|
| 122 | }
|
---|
| 123 | }
|
---|
| 124 | }
|
---|
| 125 | }
|
---|
[540b275] | 126 |
|
---|
| 127 | sout | endl;
|
---|
| 128 | L3: if( 3 ) {
|
---|
| 129 | A w = { "w" };
|
---|
| 130 | if( 4 ) {
|
---|
| 131 | A v = { "v" };
|
---|
| 132 | sout | "break L3" | endl;
|
---|
| 133 | break L3;
|
---|
| 134 | }
|
---|
| 135 | }
|
---|
[85f0713] | 136 | }
|
---|
| 137 |
|
---|
| 138 | // test goto
|
---|
| 139 | void h() {
|
---|
| 140 | int i = 0;
|
---|
| 141 | // for each goto G with target label L:
|
---|
| 142 | // * find all constructed variables alive at G (set S_G)
|
---|
| 143 | // * find all constructed variables alive at L (set S_L)
|
---|
| 144 | // * if S_L-S_G is non-empty, error
|
---|
| 145 | // * emit destructors for all variables in S_G-S_L
|
---|
| 146 | sout | "h" | endl;
|
---|
| 147 | {
|
---|
| 148 | L0: ;
|
---|
| 149 | #ifdef ERR1
|
---|
| 150 | goto L1; // this is an error in g++ because it skips initialization of y
|
---|
| 151 | #endif
|
---|
| 152 | A y = { "y" };
|
---|
| 153 | // S_L1 = { y }
|
---|
| 154 | L1: sout | "L1" | endl;
|
---|
| 155 | A x = { "x" };
|
---|
| 156 | // S_L2 = { y, x }
|
---|
| 157 | L2: sout | "L2" | endl;
|
---|
| 158 | if (i == 0) {
|
---|
| 159 | ++i;
|
---|
| 160 | sout | "goto L1" | endl;
|
---|
| 161 | // S_G = { y, x }
|
---|
| 162 | goto L1; // jump back, destruct b/c before x definition
|
---|
| 163 | // S_L-S_G = {} => no error
|
---|
| 164 | // S_G-S_L = { x } => destruct x
|
---|
| 165 | } else if (i == 1) {
|
---|
| 166 | ++i;
|
---|
| 167 | sout | "goto L2" | endl;
|
---|
| 168 | // S_G = { y, x }
|
---|
| 169 | goto L2; // jump back, do not destruct
|
---|
| 170 | // S_L-S_G = {}
|
---|
| 171 | // S_G-S_L = {} => destruct nothing
|
---|
| 172 | } else if (i == 2) {
|
---|
| 173 | ++i;
|
---|
| 174 | sout | "goto L3" | endl;
|
---|
| 175 | // S_G = { y, x }
|
---|
| 176 | goto L3; // jump ahead, do not destruct
|
---|
| 177 | // S_L-S_G = {}
|
---|
| 178 | // S_G-S_L = {}
|
---|
| 179 | } else if (false) {
|
---|
| 180 | ++i;
|
---|
| 181 | A z = { "z" };
|
---|
| 182 | sout | "goto L3-2" | endl;
|
---|
| 183 | // S_G = { z, y, x }
|
---|
| 184 | goto L3;
|
---|
| 185 | // S_L-S_G = {}
|
---|
| 186 | // S_G-S_L = {z} => destruct z
|
---|
| 187 | } else {
|
---|
| 188 | ++i;
|
---|
| 189 | sout | "goto L4" | endl;
|
---|
| 190 | // S_G = { y, x }
|
---|
| 191 | goto L4; // jump ahead, destruct b/c left block x was defined in
|
---|
| 192 | // S_L-S_G = {}
|
---|
| 193 | // S_G-S_L = { y, x } => destruct y, x
|
---|
| 194 | }
|
---|
| 195 | // S_L3 = { y, x }
|
---|
| 196 | L3: sout | "L3" | endl;
|
---|
| 197 | sout | "goto L2-2" | endl;
|
---|
| 198 | // S_G = { y, x }
|
---|
| 199 | goto L2; // jump back, do not destruct
|
---|
| 200 | // S_L-S_G = {}
|
---|
| 201 | // S_G-S_L = {}
|
---|
| 202 | }
|
---|
| 203 | // S_L4 = {}
|
---|
| 204 | L4: sout | "L4" | endl;
|
---|
| 205 | if (i == 4) {
|
---|
| 206 | sout | "goto L0" | endl;
|
---|
| 207 | // S_G = {}
|
---|
| 208 | goto L0;
|
---|
| 209 | // S_L-S_G = {}
|
---|
| 210 | // S_G-S_L = {}
|
---|
| 211 | }
|
---|
| 212 | #ifdef ERR2
|
---|
[32b8144] | 213 | // S_G = {}
|
---|
[85f0713] | 214 | if (i == 5) goto L2; // this is an error in g++ because it skips initialization of y, x
|
---|
| 215 | // S_L-S_G = { y, x } => non-empty, so error
|
---|
| 216 | #endif
|
---|
| 217 | }
|
---|
| 218 |
|
---|
[5809461] | 219 | // TODO: implement __label__ and uncomment these lines
|
---|
| 220 | void computedGoto() {
|
---|
| 221 | // __label__ bar;
|
---|
| 222 | void *ptr;
|
---|
| 223 | ptr = &&foo;
|
---|
| 224 | goto *ptr;
|
---|
| 225 | assert(false);
|
---|
| 226 | foo: ;
|
---|
| 227 | // void f() {
|
---|
| 228 | // ptr = &&bar;
|
---|
| 229 | // goto *ptr;
|
---|
| 230 | // assert(false);
|
---|
| 231 | // }
|
---|
| 232 | // f();
|
---|
| 233 | // assert(false);
|
---|
| 234 | // bar: ;
|
---|
| 235 | }
|
---|
| 236 |
|
---|
[85f0713] | 237 | int main() {
|
---|
| 238 | sepDisable(sout);
|
---|
| 239 | for (int i = 0; i < 4; i++) {
|
---|
| 240 | f(i);
|
---|
| 241 | }
|
---|
| 242 | sout | endl;
|
---|
| 243 | g();
|
---|
| 244 | sout | endl;
|
---|
| 245 | h();
|
---|
[5809461] | 246 |
|
---|
| 247 | computedGoto();
|
---|
[85f0713] | 248 | }
|
---|
[5ead9f9] | 249 |
|
---|
| 250 | // Local Variables: //
|
---|
| 251 | // tab-width: 4 //
|
---|
| 252 | // compile-command: "cfa dtor-early-exit" //
|
---|
| 253 | // End: //
|
---|