annotate run/destructor_03.d @ 0:3269e4627918

init dstress
author svnowner
date Sat, 25 Sep 2004 22:33:30 +0000
parents
children 3414705c41ac
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
3269e4627918 init dstress
svnowner
parents:
diff changeset
1 // $Header: /home/th/Dokumente/Entwicklung/MEIN_CVS/MiniD/src/run/destructor_03.d,v 1.1 2004/08/20 23:42:52 th Exp $
3269e4627918 init dstress
svnowner
parents:
diff changeset
2
3269e4627918 init dstress
svnowner
parents:
diff changeset
3 // @author@ Ilya Zaitseff <sark7@mail333.com>
3269e4627918 init dstress
svnowner
parents:
diff changeset
4 // @date@ 2004-08-06
3269e4627918 init dstress
svnowner
parents:
diff changeset
5 // @uri@ news://opscahl7ddaaezs2@ilya.tec.amursk.ru
3269e4627918 init dstress
svnowner
parents:
diff changeset
6
3269e4627918 init dstress
svnowner
parents:
diff changeset
7 int status;
3269e4627918 init dstress
svnowner
parents:
diff changeset
8
3269e4627918 init dstress
svnowner
parents:
diff changeset
9 class MyClass{
3269e4627918 init dstress
svnowner
parents:
diff changeset
10 this(){
3269e4627918 init dstress
svnowner
parents:
diff changeset
11 status++;
3269e4627918 init dstress
svnowner
parents:
diff changeset
12 }
3269e4627918 init dstress
svnowner
parents:
diff changeset
13
3269e4627918 init dstress
svnowner
parents:
diff changeset
14 ~this(){
3269e4627918 init dstress
svnowner
parents:
diff changeset
15 status++;
3269e4627918 init dstress
svnowner
parents:
diff changeset
16 status*=3;
3269e4627918 init dstress
svnowner
parents:
diff changeset
17 throw new Exception("E2");
3269e4627918 init dstress
svnowner
parents:
diff changeset
18 }
3269e4627918 init dstress
svnowner
parents:
diff changeset
19 }
3269e4627918 init dstress
svnowner
parents:
diff changeset
20
3269e4627918 init dstress
svnowner
parents:
diff changeset
21 int main(){
3269e4627918 init dstress
svnowner
parents:
diff changeset
22 try{
3269e4627918 init dstress
svnowner
parents:
diff changeset
23 auto MyClass m = new MyClass();
3269e4627918 init dstress
svnowner
parents:
diff changeset
24 assert(status == 1);
3269e4627918 init dstress
svnowner
parents:
diff changeset
25 delete m;
3269e4627918 init dstress
svnowner
parents:
diff changeset
26 }catch(Exception e){
3269e4627918 init dstress
svnowner
parents:
diff changeset
27 assert(status == 6);
3269e4627918 init dstress
svnowner
parents:
diff changeset
28 status/=3;
3269e4627918 init dstress
svnowner
parents:
diff changeset
29 status-=2;
3269e4627918 init dstress
svnowner
parents:
diff changeset
30 }
3269e4627918 init dstress
svnowner
parents:
diff changeset
31
3269e4627918 init dstress
svnowner
parents:
diff changeset
32 assert( status == 0 );
3269e4627918 init dstress
svnowner
parents:
diff changeset
33 return 0;
3269e4627918 init dstress
svnowner
parents:
diff changeset
34 }