PR fortran/14923
[official-gcc.git] / gcc / gbl-ctors.h
blob2a56a9fb9fb2b462da915b5ca67c7f40aee3e46d
1 /* Definitions relating to the special __do_global_init function used
2 for getting g++ file-scope static objects constructed. This file
3 will get included either by libgcc2.c (for systems that don't support
4 a .init section) or by crtstuff.c (for those that do).
5 Copyright (C) 1991, 1995, 1996, 1998, 1999, 2000, 2003
6 Free Software Foundation, Inc.
7 Contributed by Ron Guilmette (rfg@segfault.us.com)
9 This file is part of GCC.
11 GCC is free software; you can redistribute it and/or modify it under
12 the terms of the GNU General Public License as published by the Free
13 Software Foundation; either version 2, or (at your option) any later
14 version.
16 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
17 WARRANTY; without even the implied warranty of MERCHANTABILITY or
18 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
19 for more details.
21 You should have received a copy of the GNU General Public License
22 along with GCC; see the file COPYING. If not, write to the Free
23 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
24 02111-1307, USA. */
26 /* As a special exception, if you link this library with other files,
27 some of which are compiled with GCC, to produce an executable,
28 this library does not by itself cause the resulting executable
29 to be covered by the GNU General Public License.
30 This exception does not however invalidate any other reasons why
31 the executable file might be covered by the GNU General Public License. */
33 /* This file contains definitions and declarations of things
34 relating to the normal start-up-time invocation of C++
35 file-scope static object constructors. These declarations
36 and definitions are used by *both* libgcc2.c and by crtstuff.c.
38 Note that this file should only be compiled with GCC.
41 /* Declare a pointer to void function type. */
43 typedef void (*func_ptr) (void);
45 /* Declare the set of symbols use as begin and end markers for the lists
46 of global object constructors and global object destructors. */
48 extern func_ptr __CTOR_LIST__[];
49 extern func_ptr __DTOR_LIST__[];
51 /* Declare the routine which needs to get invoked at program start time. */
53 extern void __do_global_ctors (void);
55 /* Declare the routine which needs to get invoked at program exit time. */
57 extern void __do_global_dtors (void);
59 /* Define a macro with the code which needs to be executed at program
60 start-up time. This macro is used in two places in crtstuff.c (for
61 systems which support a .init section) and in one place in libgcc2.c
62 (for those system which do *not* support a .init section). For all
63 three places where this code might appear, it must be identical, so
64 we define it once here as a macro to avoid various instances getting
65 out-of-sync with one another. */
67 /* Some systems place the number of pointers
68 in the first word of the table.
69 On other systems, that word is -1.
70 In all cases, the table is null-terminated.
71 If the length is not recorded, count up to the null. */
73 /* Some systems use a different strategy for finding the ctors.
74 For example, svr3. */
75 #ifndef DO_GLOBAL_CTORS_BODY
76 #define DO_GLOBAL_CTORS_BODY \
77 do { \
78 unsigned long nptrs = (unsigned long) __CTOR_LIST__[0]; \
79 unsigned i; \
80 if (nptrs == (unsigned long)-1) \
81 for (nptrs = 0; __CTOR_LIST__[nptrs + 1] != 0; nptrs++); \
82 for (i = nptrs; i >= 1; i--) \
83 __CTOR_LIST__[i] (); \
84 } while (0)
85 #endif