/* perlvars.h * * Copyright (C) 1999, 2000, 2001, 2002, 2003,
2004, 2005, 2006, 2007, * by Larry Wall and others * * You may
distribute under the terms of either the GNU General Public *
License or the Artistic License, as specified in the README
file. * */ /* =head1 Global Variables These variables are global
to an entire process. They are shared between all interpreters
and all threads in a process. =cut */ /* Don't forget to re-run
regen/embed.pl to propagate changes! */ /* This file describes
the "global" variables used by perl * This used to be in perl.h
directly but we want to abstract out into * distinct files which
are per-thread, per-interpreter or really global, * and how
they're initialized. * * The 'G' prefix is only needed for vars
that need appropriate #defines * generated in embed*.h. Such
symbols are also used to generate * the appropriate export list
for win32. */ /* global state */ #if defined(USE_ITHREADS)
PERLVAR(G, op_mutex, perl_mutex) /* Mutex for op refcounting */
#endif PERLVAR(G, cur