Revert "[perl #113060] Save cop_stashlen threaded even with shared cop pv"
authorFather Chrysostomos <sprout@cpan.org>
Sat, 23 Jun 2012 13:31:17 +0000 (06:31 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 23 Jun 2012 13:31:17 +0000 (06:31 -0700)
This reverts commit d828bad9a3194890e274f06525bf053614b4831b.

scope.h

index 38da244..aa04a79 100644 (file)
--- a/scope.h
+++ b/scope.h
@@ -237,8 +237,7 @@ scope has the given name. Name must be a literal string.
 #ifdef USE_ITHREADS
 #  define SAVECOPSTASH(c)      (SAVEPPTR(CopSTASHPV(c)), \
                                 SAVEI32(CopSTASH_len(c)))
-#  define SAVECOPSTASH_FREE(c) (SAVESHAREDPV(CopSTASHPV(c)), \
-                                SAVEI32(CopSTASH_len(c)))
+#  define SAVECOPSTASH_FREE(c) SAVESHAREDPV(CopSTASHPV(c))
 #  define SAVECOPFILE(c)       SAVEPPTR(CopFILE(c))
 #  define SAVECOPFILE_FREE(c)  SAVESHAREDPV(CopFILE(c))
 #else