diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-28 22:55:24 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-28 22:55:24 +0000 |
| commit | 0a3788024daeeff27b99d9992ad4f1eb40663b1a (patch) | |
| tree | c4f94dd14dd9658f90c215aae62e09aeeae00c94 /embedvar.h | |
| parent | 515f097614eaa79c1f9c40647e200dc7dc7dd619 (diff) | |
| download | perl-0a3788024daeeff27b99d9992ad4f1eb40663b1a.tar.gz | |
Add the encoding pragma to control the "upgrade"
from the native eight bit data to Unicode.
TODO: \x.. and \0... literals. \N{}. chr()? ord()?
p4raw-id: //depot/perl@12750
Diffstat (limited to 'embedvar.h')
| -rw-r--r-- | embedvar.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h index 2eb540791e..95550e6d60 100644 --- a/embedvar.h +++ b/embedvar.h @@ -231,6 +231,7 @@ #define PL_dowarn (PERL_GET_INTERP->Idowarn) #define PL_e_script (PERL_GET_INTERP->Ie_script) #define PL_egid (PERL_GET_INTERP->Iegid) +#define PL_encoding (PERL_GET_INTERP->Iencoding) #define PL_endav (PERL_GET_INTERP->Iendav) #define PL_envgv (PERL_GET_INTERP->Ienvgv) #define PL_errgv (PERL_GET_INTERP->Ierrgv) @@ -522,6 +523,7 @@ #define PL_dowarn (vTHX->Idowarn) #define PL_e_script (vTHX->Ie_script) #define PL_egid (vTHX->Iegid) +#define PL_encoding (vTHX->Iencoding) #define PL_endav (vTHX->Iendav) #define PL_envgv (vTHX->Ienvgv) #define PL_errgv (vTHX->Ierrgv) @@ -816,6 +818,7 @@ #define PL_Idowarn PL_dowarn #define PL_Ie_script PL_e_script #define PL_Iegid PL_egid +#define PL_Iencoding PL_encoding #define PL_Iendav PL_endav #define PL_Ienvgv PL_envgv #define PL_Ierrgv PL_errgv |