This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
op.c: Document newGIVENOP(..., 0)
[perl5.git] / pp.h
diff --git a/pp.h b/pp.h
index 1b29739..46f5742 100644 (file)
--- a/pp.h
+++ b/pp.h
@@ -527,7 +527,7 @@ True if this op will be the return value of an lvalue subroutine
 #  define MAYBE_DEREF_GV(sv)      MAYBE_DEREF_GV_flags(sv,SV_GMAGIC)
 #  define MAYBE_DEREF_GV_nomg(sv) MAYBE_DEREF_GV_flags(sv,0)
 
-#  define FIND_RUNCV_root_eq   1
+#  define FIND_RUNCV_padid_eq  1
 #  define FIND_RUNCV_level_eq  2
 
 #endif