"rkeys",
"rvalues",
"coreargs",
+ "runcv",
};
#endif
"keys on reference",
"values on reference",
"CORE:: subroutine",
+ "__SUB__",
};
#endif
Perl_pp_rkeys,
Perl_pp_rvalues, /* implemented by Perl_pp_rkeys */
Perl_pp_coreargs,
+ Perl_pp_runcv,
}
#endif
#ifdef PERL_PPADDR_INITED
Perl_ck_fun, /* hex */
Perl_ck_fun, /* oct */
Perl_ck_fun, /* abs */
- Perl_ck_fun, /* length */
+ Perl_ck_length, /* length */
Perl_ck_substr, /* substr */
Perl_ck_fun, /* vec */
Perl_ck_index, /* index */
Perl_ck_index, /* rindex */
- Perl_ck_fun, /* sprintf */
+ Perl_ck_lfun, /* sprintf */
Perl_ck_fun, /* formline */
Perl_ck_fun, /* ord */
Perl_ck_fun, /* chr */
Perl_ck_fun, /* sysread */
Perl_ck_fun, /* syswrite */
Perl_ck_eof, /* eof */
- Perl_ck_fun, /* tell */
- Perl_ck_fun, /* seek */
+ Perl_ck_tell, /* tell */
+ Perl_ck_tell, /* seek */
Perl_ck_trunc, /* truncate */
Perl_ck_fun, /* fcntl */
Perl_ck_fun, /* ioctl */
Perl_ck_each, /* rkeys */
Perl_ck_each, /* rvalues */
Perl_ck_null, /* coreargs */
+ Perl_ck_null, /* runcv */
}
#endif
#ifdef PERL_CHECK_INITED
0x00001b08, /* rkeys */
0x00001b08, /* rvalues */
0x00000600, /* coreargs */
+ 0x00000004, /* runcv */
};
#endif