#define PL_savebegin (*Perl_Isavebegin_ptr(aTHX))
#undef PL_sawampersand
#define PL_sawampersand (*Perl_Isawampersand_ptr(aTHX))
-#undef PL_sh_path
-#define PL_sh_path (*Perl_Ish_path_ptr(aTHX))
+#undef PL_sh_path_compat
+#define PL_sh_path_compat (*Perl_Ish_path_compat_ptr(aTHX))
#undef PL_sig_pending
#define PL_sig_pending (*Perl_Isig_pending_ptr(aTHX))
#undef PL_sighandlerp
#define PL_runops_dbg (*Perl_Grunops_dbg_ptr(NULL))
#undef PL_runops_std
#define PL_runops_std (*Perl_Grunops_std_ptr(NULL))
+#undef PL_sh_path
+#define PL_sh_path (*Perl_Gsh_path_ptr(NULL))
#undef PL_sharehook
#define PL_sharehook (*Perl_Gsharehook_ptr(NULL))
#undef PL_thr_key