diff options
| -rw-r--r-- | embedvar.h | 3 | ||||
| -rw-r--r-- | perlapi.h | 2 |
2 files changed, 5 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h index 3c12a6af65..95e70b9960 100644 --- a/embedvar.h +++ b/embedvar.h @@ -388,6 +388,7 @@ #define PL_sh_path (PERL_GET_INTERP->Ish_path) #define PL_sig_pending (PERL_GET_INTERP->Isig_pending) #define PL_sighandlerp (PERL_GET_INTERP->Isighandlerp) +#define PL_sort_RealCmp (PERL_GET_INTERP->Isort_RealCmp) #define PL_splitstr (PERL_GET_INTERP->Isplitstr) #define PL_srand_called (PERL_GET_INTERP->Isrand_called) #define PL_statusvalue (PERL_GET_INTERP->Istatusvalue) @@ -689,6 +690,7 @@ #define PL_sh_path (vTHX->Ish_path) #define PL_sig_pending (vTHX->Isig_pending) #define PL_sighandlerp (vTHX->Isighandlerp) +#define PL_sort_RealCmp (vTHX->Isort_RealCmp) #define PL_splitstr (vTHX->Isplitstr) #define PL_srand_called (vTHX->Isrand_called) #define PL_statusvalue (vTHX->Istatusvalue) @@ -993,6 +995,7 @@ #define PL_Ish_path PL_sh_path #define PL_Isig_pending PL_sig_pending #define PL_Isighandlerp PL_sighandlerp +#define PL_Isort_RealCmp PL_sort_RealCmp #define PL_Isplitstr PL_splitstr #define PL_Isrand_called PL_srand_called #define PL_Istatusvalue PL_statusvalue @@ -504,6 +504,8 @@ END_EXTERN_C #define PL_sig_pending (*Perl_Isig_pending_ptr(aTHX)) #undef PL_sighandlerp #define PL_sighandlerp (*Perl_Isighandlerp_ptr(aTHX)) +#undef PL_sort_RealCmp +#define PL_sort_RealCmp (*Perl_Isort_RealCmp_ptr(aTHX)) #undef PL_splitstr #define PL_splitstr (*Perl_Isplitstr_ptr(aTHX)) #undef PL_srand_called |