[perl #92258] <$fh> hangs on a glob copy
[perl.git] / globals.c
1 /*    globals.c
2  *
3  *    Copyright (C) 1995, 1999, 2000, 2001, by Larry Wall and others
4  *
5  *    You may distribute under the terms of either the GNU General Public
6  *    License or the Artistic License, as specified in the README file.
7  *
8  */
9
10 /*
11  * 'For the rest, they shall represent the other Free Peoples of the World:
12  *  Elves, Dwarves, and Men.'                                --Elrond
13  *
14  *     [p.275 of _The Lord of the Rings_, II/iii: "The Ring Goes South"]
15  */
16
17 /* This file exists to #include "perl.h" _ONCE_ with
18  * PERL_IN_GLOBALS_C defined. That causes various global varaiables
19  * in perl.h and other files it includes to be _defined_ (and initialized)
20  * rather than just declared.
21  *
22  * There is a #include "perlapi.h" which makes use of the fact
23  * that the object file created from this file will be included by linker
24  * (to resolve global variables). perlapi.h mention various other "API"
25  * functions not used by perl itself, but the functions get
26  * pulled into the perl executable via the refrerence here.
27  *
28 */
29
30 #include "INTERN.h"
31 #define PERL_IN_GLOBALS_C
32 #include "perl.h"
33
34 #include "perlapi.h"            /* bring in PL_force_link_funcs */
35
36 /*
37  * Local variables:
38  * c-indentation-style: bsd
39  * c-basic-offset: 4
40  * indent-tabs-mode: t
41  * End:
42  *
43  * ex: set ts=8 sts=4 sw=4 noet:
44  */