Searched refs:PL_patchlevel (Results 1 – 5 of 5) sorted by relevance
305 PL_patchlevel = NEWSV(0,4); in perl_construct()306 (void)SvUPGRADE(PL_patchlevel, SVt_PVNV); in perl_construct()308 SvGROW(PL_patchlevel, UTF8_MAXLEN*3+1); in perl_construct()309 s = (U8*)SvPVX(PL_patchlevel); in perl_construct()315 SvCUR_set(PL_patchlevel, s - (U8*)SvPVX(PL_patchlevel)); in perl_construct()316 SvPOK_on(PL_patchlevel); in perl_construct()317 SvNVX(PL_patchlevel) = (NV)PERL_REVISION + in perl_construct()320 SvNOK_on(PL_patchlevel); /* dual valued */ in perl_construct()321 SvUTF8_on(PL_patchlevel); in perl_construct()322 SvREADONLY_on(PL_patchlevel); in perl_construct()[all …]
1065 SvNVX(PL_patchlevel)); in Perl_gv_fetchpv()1066 SvNVX(sv) = SvNVX(PL_patchlevel); in Perl_gv_fetchpv()1074 GvSV(gv) = SvREFCNT_inc(PL_patchlevel); in Perl_gv_fetchpv()
471 #undef PL_patchlevel472 #define PL_patchlevel (*Perl_Ipatchlevel_ptr(aTHX))
375 #define PL_patchlevel (PERL_GET_INTERP->Ipatchlevel) macro697 #define PL_patchlevel (vTHX->Ipatchlevel) macro1022 #define PL_Ipatchlevel PL_patchlevel
10833 PL_patchlevel = sv_dup_inc(proto_perl->Ipatchlevel, param); in perl_clone_using()