sv_numcmp_common: only call magic once if the SVs are the same

tonycoz · tonycoz · commit 403367e6426d · 2025-11-28T09:48:13.000+11:00
similar to try_amagic_bin()
diff --git a/sv.c b/sv.c
@@ -8711,7 +8711,7 @@ S_sv_numcmp_common(pTHX_ SV **sv1, SV **sv2, const U32 flags,
     if(flags & SV_GMAGIC) {
         if(*sv1)
             SvGETMAGIC(*sv1);
-        if(*sv2)
+        if(*sv2 && (!*sv1 || *sv1 != *sv2))
             SvGETMAGIC(*sv2);
     }
 

Original file line number	Diff line number	Diff line change
`@@ -8711,7 +8711,7 @@ S_sv_numcmp_common(pTHX_ SV sv1, SV sv2, const U32 flags,`
`8711`	`8711`	`if(flags & SV_GMAGIC) {`
`8712`	`8712`	`if(*sv1)`
`8713`	`8713`	`SvGETMAGIC(*sv1);`
`8714`		`- if(*sv2)`
	`8714`	`+ if(sv2 && (!sv1 \|\| sv1 != sv2))`
`8715`	`8715`	`SvGETMAGIC(*sv2);`
`8716`	`8716`	`}`
`8717`	`8717`