From 3cc54a1f49451ebc6892cc4fcfc3faf510b77181 Mon Sep 17 00:00:00 2001 From: Artur Bergman Date: Thu, 25 Oct 2001 10:17:26 +0000 Subject: [PATCH] Note to self, doing *src_ary++ in a macro that evaluates the value more than once is a good way to dump core. p4raw-id: //depot/perl@12639 --- sharedsv.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/sharedsv.c b/sharedsv.c index e91d7b97d9..ef5ebf0b6b 100644 --- a/sharedsv.c +++ b/sharedsv.c @@ -218,7 +218,8 @@ Perl_sharedsv_thrcnt_dec(pTHX_ shared_sv* ssv) while (items-- > 0) { if(SvTYPE(*src_ary)) - Perl_sharedsv_thrcnt_dec(aTHX_ INT2PTR(shared_sv *, SvIV(*src_ary++))); + Perl_sharedsv_thrcnt_dec(aTHX_ INT2PTR(shared_sv *, SvIV(*src_ary))); + src_ary++; } break; } -- 2.34.1