summaryrefslogtreecommitdiff
path: root/scope.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-04-13 16:14:23 +0000
committerNicholas Clark <nick@ccl4.org>2006-04-13 16:14:23 +0000
commitc88c823b70650169d3aaff2f95978d279e81b562 (patch)
tree73c2ca246d565bb2343a05dbac1546013b944908 /scope.h
parent4ae2f9814731932908f61ce4a79c6da6063584e7 (diff)
downloadperl-c88c823b70650169d3aaff2f95978d279e81b562.tar.gz
Remove SAVEt_FREESHAREDPV, as nothing is using it, and it isn't catered
for in Perl_ss_dup, hence nothing is testing it and nothing will alert us if it breaks. p4raw-id: //depot/perl@27792
Diffstat (limited to 'scope.h')
-rw-r--r--scope.h12
1 files changed, 2 insertions, 10 deletions
diff --git a/scope.h b/scope.h
index 5efb8fca53..580d10946b 100644
--- a/scope.h
+++ b/scope.h
@@ -51,8 +51,7 @@
#define SAVEt_SAVESWITCHSTACK 40
#define SAVEt_COP_ARYBASE 41
#define SAVEt_RE_STATE 42
-#define SAVEt_FREESHAREDPV 43
-#define SAVEt_COP_WARNINGS 44
+#define SAVEt_COP_WARNINGS 43
#ifndef SCOPE_SAVES_SIGNAL_MASK
#define SCOPE_SAVES_SIGNAL_MASK 0
@@ -194,14 +193,7 @@ Closing bracket on a callback. See C<ENTER> and L<perlcall>.
SSPUSHINT(SAVEt_COP_ARYBASE); \
} STMT_END
-#define SAVEFREESHAREDPV(pv) \
- STMT_START { \
- SSCHECK(2); \
- SSPUSHPTR(pv); \
- SSPUSHINT(SAVEt_FREESHAREDPV); \
- } STMT_END
-
-/* Need to do the cop warnings like this, rather than SAVEFREESHAREDPV,
+/* Need to do the cop warnings like this, rather than a "SAVEFREESHAREDPV",
because realloc() means that the value can actually change. Possibly
could have done savefreesharedpvREF, but this way actually seems cleaner,
as it simplifies the code that does the saves, and reduces the load on the