diff options
| author | Nicholas Clark <nick@ccl4.org> | 2010-05-21 20:32:28 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2010-05-21 20:32:28 +0100 |
| commit | 4fa7c2bfe0a54ceffcc7c56cdc072eaeaf54cad9 (patch) | |
| tree | bbe2ab90c77b0ae537b4b20003bfd5ad4820d501 /intrpvar.h | |
| parent | fcd24582e9751804a977b6d4ef227de5a3b0343b (diff) | |
| download | perl-4fa7c2bfe0a54ceffcc7c56cdc072eaeaf54cad9.tar.gz | |
PL_in_load_module only has values 0 and 1, so can be a bool instead of int.
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/intrpvar.h b/intrpvar.h index 4af88f686e..bfa613c6e0 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -257,7 +257,7 @@ PERLVAR(Iexit_flags, U8) /* was exit() unexpected, etc. */ PERLVAR(Isrand_called, bool) /* Part of internal state, but makes the 16th 1 byte variable in a row. */ PERLVAR(Itainting, bool) /* doing taint checks */ -/* Space for a U8 */ +PERLVARI(Iin_load_module, bool, FALSE) /* to prevent recursions in PerlIO_find_layer */ PERLVAR(Iinplace, char *) PERLVAR(Ie_script, SV *) @@ -632,7 +632,7 @@ PERLVARI(Iunitcheckav_save, AV*, NULL) /* save UNITCHECK{}s when compiling */ PERLVARI(Iclocktick, long, 0) /* this many times() ticks in a second */ -PERLVARI(Iin_load_module, int, 0) /* to prevent recursions in PerlIO_find_layer */ +/* Space for an int */ PERLVAR(Iunicode, U32) /* Unicode features: $ENV{PERL_UNICODE} or -C */ |