This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Revert ‘Used pad name lists for pad ids’
[perl5.git] / intrpvar.h
index 6397eb6..39eac06 100644 (file)
@@ -744,6 +744,8 @@ PERLVAR(I, debug_pad,       struct perl_debug_pad)  /* always needed because of the re
 /* Hook for File::Glob */
 PERLVARI(I, globhook,  globhook_t, NULL)
 
+PERLVARI(I, padlist_generation, U32, 1)        /* id to identify padlist clones */
+
 /* The last unconditional member of the interpreter structure when 5.21.7 was
    released. The offset of the end of this is baked into a global variable in 
    any shared perl library which will allow a sanity test in future perl