This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Revert "Set PL_comppad_name on sub entry"
[perl5.git] / scope.h
diff --git a/scope.h b/scope.h
index a69be5f..0fad9a3 100644 (file)
--- a/scope.h
+++ b/scope.h
@@ -208,8 +208,7 @@ scope has the given name. Name must be a literal string.
 
 #define SAVEHINTS()    save_hints()
 
-#define SAVECOMPPAD() save_pushptrptr(MUTABLE_SV(PL_comppad_name), \
-                                    MUTABLE_SV(PL_comppad), SAVEt_COMPPAD)
+#define SAVECOMPPAD() save_pushptr(MUTABLE_SV(PL_comppad), SAVEt_COMPPAD)
 
 #define SAVESWITCHSTACK(f,t) \
     STMT_START {                                       \