Update Devel-PPPort to release 3.62

[perl5.git] / dist / Devel-PPPort / parts / inc / newRV

diff --git a/dist/Devel-PPPort/parts/inc/newRV b/dist/Devel-PPPort/parts/inc/newRV
index 6be9ca5..fe25482 100644 (file)
--- a/dist/Devel-PPPort/parts/inc/newRV
+++ b/dist/Devel-PPPort/parts/inc/newRV
@@ -19,7 +19,7 @@ newRV_noinc
 __UNDEFINED__  newRV_inc(sv)  newRV(sv)   /* Replace */
 
 #ifndef newRV_noinc
-#if defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN)
+#if defined(PERL_USE_GCC_BRACE_GROUPS)
 #  define newRV_noinc(sv) ({ SV *_sv = (SV *)newRV((sv)); SvREFCNT_dec((sv)); _sv; })
 #else
 #  define newRV_noinc(sv) ((PL_Sv = (SV *)newRV((sv))), SvREFCNT_dec((sv)), PL_Sv)