Home
last modified time | relevance | path

Searched refs:PL_prevailing_version (Results 1 – 5 of 5) sorted by relevance

/openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/
D50350098 PL_prevailing_version # Z added by devel/scanprov
/openbsd/src/gnu/usr.bin/perl/
Dscope.c915 SS_ADD_UV(SAVEt_HINTS_HH | (PL_prevailing_version << 8)); in Perl_save_hints()
922 save_pushi32ptr(PL_hints, save_cophh, SAVEt_HINTS | (PL_prevailing_version << 8)); in Perl_save_hints()
1624 PL_prevailing_version = (U16)(uv >> 8); in Perl_leave_scope()
Dembedvar.h233 # define PL_prevailing_version (vTHX->Iprevailing_version) macro
Dpp_ctl.c4058 PL_prevailing_version = 0; in S_doeval_compile()
4065 PL_prevailing_version = 0; /* we might change this below */ in S_doeval_compile()
4087 SAVEI16(PL_prevailing_version); in S_doeval_compile()
4088 PL_prevailing_version = SvUV(versv); in S_doeval_compile()
Dop.c8031 if (shortver && PL_prevailing_version) { in Perl_utilize()
8035 if (PL_prevailing_version < SHORTVER(5, 10)) { in Perl_utilize()
8039 else if (shortver == PL_prevailing_version) { in Perl_utilize()
8045 else if (PL_prevailing_version >= SHORTVER(5, 39)) { in Perl_utilize()
8048 else if (PL_prevailing_version >= SHORTVER(5, 11) && shortver < SHORTVER(5, 11)) { in Perl_utilize()
8087 if ((shortver >= SHORTVER(5, 39)) || (PL_prevailing_version >= SHORTVER(5, 39))) { in Perl_utilize()
8093 PL_prevailing_version = shortver; in Perl_utilize()
12419 if(PL_prevailing_version != 0) in Perl_ck_eval()
12462 hv_stores(hh, "CORE/prevailing_version", newSVuv(PL_prevailing_version)); in Perl_ck_eval()