387
|
1 // $HeadURL$
|
|
2 // $Date$
|
|
3 // $Author$
|
|
4
|
|
5 // @author@ Regan Heath <regan@netwin.co.nz>
|
|
6 // @date@ 2005-03-25
|
1489
|
7 // @uri@ http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=3340
|
387
|
8
|
739
|
9 // __DSTRESS_ELINE__ 13
|
387
|
10
|
|
11 module dstress.nocompile.debug_info_02;
|
|
12
|
|
13 typedef fn function() fn;
|
|
14
|
|
15 byte status;
|
|
16
|
|
17 fn foo() {
|
|
18 status++;
|
|
19 return &foo;
|
|
20 }
|
|
21
|
|
22 int main(){
|
|
23 assert(status==0);
|
|
24 fn p = foo();
|
|
25 assert(status==1);
|
|
26 p();
|
|
27 assert(status==2);
|
|
28 return 0;
|
|
29 }
|