Personal tools
You are here: Home Projects C++ Cfront releases Release 1.0 Source cfront scratch lib dtors..c
Document Actions

dtors..c

by Paul McJones last modified 2007-02-02 09:34

Click here to get the file

Size 1 kB - File type text/x-csrc

File contents

#line 1 "../../lib/static/dtors.c"

/* <<cfront 10/10/85>> */
/* < ../../lib/static/dtors.c */
int * _new ( ) ; 
int _delete ( ) ; 
int * _vec_new ( ) ; 
int _vec_delete ( ) ; 

#line 1 "../../lib/static/dtors.c"
typedef int ( * PFV ) ( ) ; 

#line 6 "../../lib/static/dtors.c"
int dtors ( ) 
#line 7 "../../lib/static/dtors.c"
{ 
#line 7 "../../lib/static/dtors.c"

#line 8 "../../lib/static/dtors.c"
extern PFV _dtors [ ] ; 

#line 9 "../../lib/static/dtors.c"
static int _static_ddone ; 

#line 10 "../../lib/static/dtors.c"
if ( _static_ddone == 0 ) { 
#line 10 "../../lib/static/dtors.c"
_static_ddone = 1 ; 

#line 12 "../../lib/static/dtors.c"
{ 
#line 12 "../../lib/static/dtors.c"
PFV * _auto_pf ; 

#line 12 "../../lib/static/dtors.c"
_auto_pf = _dtors ; 

#line 13 "../../lib/static/dtors.c"
while ( * _auto_pf ) _auto_pf ++ ; 

#line 14 "../../lib/static/dtors.c"
while ( _dtors < _auto_pf ) ( * ( * ( -- _auto_pf ) ) ) ( 
#line 14 "../../lib/static/dtors.c"
) ; 
} } } ; 

/* the end */
« March 2024 »
Su Mo Tu We Th Fr Sa
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31
 

Powered by Plone CMS, the Open Source Content Management System

This site conforms to the following standards: