diff options
| -rw-r--r-- | embedvar.h | 3 | ||||
| -rw-r--r-- | perlapi.h | 2 | ||||
| -rw-r--r-- | perlvars.h | 1 |
3 files changed, 0 insertions, 6 deletions
diff --git a/embedvar.h b/embedvar.h index 85d7af5b70..13d2e56606 100644 --- a/embedvar.h +++ b/embedvar.h @@ -753,8 +753,6 @@ #define PL_Gop_seq (my_vars->Gop_seq) #define PL_op_sequence (my_vars->Gop_sequence) #define PL_Gop_sequence (my_vars->Gop_sequence) -#define PL_patleave (my_vars->Gpatleave) -#define PL_Gpatleave (my_vars->Gpatleave) #define PL_perlio_debug_fd (my_vars->Gperlio_debug_fd) #define PL_Gperlio_debug_fd (my_vars->Gperlio_debug_fd) #define PL_perlio_fd_refcnt (my_vars->Gperlio_fd_refcnt) @@ -824,7 +822,6 @@ #define PL_Gop_mutex PL_op_mutex #define PL_Gop_seq PL_op_seq #define PL_Gop_sequence PL_op_sequence -#define PL_Gpatleave PL_patleave #define PL_Gperlio_debug_fd PL_perlio_debug_fd #define PL_Gperlio_fd_refcnt PL_perlio_fd_refcnt #define PL_Gperlio_fd_refcnt_size PL_perlio_fd_refcnt_size @@ -149,8 +149,6 @@ END_EXTERN_C #define PL_op_seq (*Perl_Gop_seq_ptr(NULL)) #undef PL_op_sequence #define PL_op_sequence (*Perl_Gop_sequence_ptr(NULL)) -#undef PL_patleave -#define PL_patleave (*Perl_Gpatleave_ptr(NULL)) #undef PL_perlio_debug_fd #define PL_perlio_debug_fd (*Perl_Gperlio_debug_fd_ptr(NULL)) #undef PL_perlio_fd_refcnt diff --git a/perlvars.h b/perlvars.h index 87a0d8bf16..cd888516ce 100644 --- a/perlvars.h +++ b/perlvars.h @@ -37,7 +37,6 @@ PERLVAR(Gthr_key, perl_key) /* key to retrieve per-thread struct */ PERLVARISC(GYes, "1") PERLVARISC(GNo, "") PERLVARISC(Ghexdigit, "0123456789abcdef0123456789ABCDEF") -PERLVARISC(Gpatleave, "\\.^$@dDwWsSbB+*?|()-nrtfeaxc0123456789[{]}") /* XXX does anyone even use this? */ PERLVARI(Gdo_undump, bool, FALSE) /* -u or dump seen? */ |