summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2013-10-04 15:15:56 +0200
committerFather Chrysostomos <sprout@cpan.org>2013-11-22 21:20:37 -0800
commit61bac25cda61b4427e5f2b2a645379733dac20a6 (patch)
tree5af205c24f38c7d1e4e0b587b994f8584de2c408 /toke.c
parentebdc88085efa6fca8a1b0afaa388f0491bdccd5a (diff)
downloadperl-61bac25cda61b4427e5f2b2a645379733dac20a6.tar.gz
Perl_load_module() no longer moves the current stack, so no need to save it.
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 1bdeedbdd7..72d26496b3 100644
--- a/toke.c
+++ b/toke.c
@@ -9228,7 +9228,7 @@ S_new_constant(pTHX_ const char *s, STRLEN len, const char *key, STRLEN keylen,
newSVpvs(":full"),
newSVpvs(":short"),
NULL);
- SPAGAIN;
+ assert(sp == PL_stack_sp);
table = GvHV(PL_hintgv);
if (table
&& (PL_hints & HINT_LOCALIZE_HH)