pp.c: Some branch prediction hints

1 files changed, 2 insertions, 2 deletions

diff --git a/pp.c b/pp.c
index b3a001dc0d..8f55a70b92 100644
--- a/pp.c
+++ b/pp.c
@@ -6248,7 +6248,7 @@ PP(pp_lvref)
     SV * const arg = PL_op->op_flags & OPf_STACKED ? POPs : NULL;
     sv_magic(ret, arg,
 	     PERL_MAGIC_lvref, (char *)elem, elem ? HEf_SVKEY : ARGTARG);
-    if (PL_op->op_private & OPpLVAL_INTRO) {
+    if (UNLIKELY(PL_op->op_private & OPpLVAL_INTRO)) {
       if (elem) {
 	MAGIC *mg;
 	HV *stash;
@@ -6277,7 +6277,7 @@ PP(pp_lvrefslice)
     const bool localizing = PL_op->op_private & OPpLVAL_INTRO;
     bool can_preserve = FALSE;
 
-    if (localizing) {
+    if (UNLIKELY(localizing)) {
 	MAGIC *mg;
 	HV *stash;
 	SV **svp;