1 files changed, 1 insertions, 1 deletions
diff --git a/XSUB.h b/XSUB.h
index a1e48dd47c..563d3312bf 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -114,7 +114,7 @@ is a lexical $_ in scope.
 #define XSINTERFACE_FUNC_SET(cv,f)	\
 		CvXSUBANY(cv).any_dxptr = (void (*) (pTHX_ void*))(f)
 
-#define dUNDERBAR I32 padoff_du = pad_findmy("$_")
+#define dUNDERBAR I32 padoff_du = Perl_find_rundefsvoffset()
 #define UNDERBAR ((padoff_du == NOT_IN_PAD \
 	    || PAD_COMPNAME_FLAGS(padoff_du) & SVpad_OUR) \
 	? DEFSV : PAD_SVl(padoff_du))