perlintern - ອອນລາຍໃນຄລາວ

ໂຄງການ:

NAME

perlintern - ເອກະສານອັດຕະໂນມັດຂອງຫນ້າທີ່ Perl ພາຍໃນຢ່າງດຽວ

ລາຍລະອຽດ

ໄຟລ໌ນີ້ແມ່ນເອກະສານທີ່ສ້າງຂຶ້ນອັດຕະໂນມັດຂອງຫນ້າທີ່ຢູ່ໃນຕົວແປພາສາ Perl ທີ່ເປັນ
ເອກະສານໂດຍໃຊ້ຮູບແບບເອກະສານພາຍໃນຂອງ Perl ແຕ່ບໍ່ໄດ້ຖືກໝາຍວ່າເປັນສ່ວນໜຶ່ງຂອງ
Perl API. ໃນຄໍາສັບຕ່າງໆອື່ນໆ, ພວກເຂົາເຈົ້າ ມີ ບໍ່ ສໍາລັບການ ການນໍາໃຊ້ in ການຂະຫຍາຍ!

ລວບລວມເວລາ ຂອບເຂດ hooks

BhkENTRY
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ສົ່ງຄືນຂໍ້ມູນຈາກໂຄງສ້າງ BHK. ທີ່ ເປັນ token preprocessor ຊີ້ບອກ
ທີ່ຈະກັບຄືນ. ຖ້າທຸງທີ່ເຫມາະສົມບໍ່ໄດ້ຖືກຕັ້ງ, ມັນຈະກັບຄືນມາ NULL.
ປະເພດຂອງມູນຄ່າກັບຄືນແມ່ນຂຶ້ນກັບລາຍການທີ່ທ່ານຮ້ອງຂໍ.

void * BhkENTRY(BHK *hk, ເຊິ່ງ)

BhkFLAGS
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ກັບຄືນທຸງຂອງ BHK.

U32 BhkFLAGS(BHK *hk)

CALL_BLOCK_HOOKS
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ໂທຫາທັງຫມົດ hooks ຕັນລົງທະບຽນສໍາລັບປະເພດ ທີ່. ທີ່ ແມ່ນການປຸງແຕ່ງກ່ອນ
token; ປະ​ເພດ​ຂອງ​ arg ຂຶ້ນ​ກັບ ທີ່.

CALL_BLOCK_HOOKS ເປັນໂມຄະ (ເຊິ່ງ, ໂຕ້ແຍ້ງ)

Custom ຜູ້ປະກອບການ

core_prototype
ຟັງຊັນນີ້ກຳນົດຕົ້ນແບບຂອງຟັງຊັນຫຼັກທີ່ມີຊື່ວ່າ "sv", ຫຼື a
new mortal SV ຖ້າ "sv" ເປັນ NULL. ມັນສົ່ງຄືນ "sv", ຫຼື NULL ຖ້າເປັນຫຼັກ
ຟັງຊັນບໍ່ມີຕົ້ນແບບ. "code" ແມ່ນລະຫັດທີ່ສົ່ງຄືນໂດຍ "keyword()". ມັນຕ້ອງ
ບໍ່ເທົ່າກັບ 0.

SV * core_prototype(SV *sv, const char *ຊື່,
const int ລະ​ຫັດ​,
int * const opnum)

CV ການຈັດການ ຫນ້າທີ່

docatch ກວດເບິ່ງກໍລະນີ 0 ຫຼື 3 ຂອງ cur_env.je_ret, ໃຊ້ພຽງແຕ່ພາຍໃນບໍລິບົດ eval.

0 ຖືກນໍາໃຊ້ເປັນສືບຕໍ່ພາຍໃນ evaal,

3 ຖືກນໍາໃຊ້ສໍາລັບການເສຍຊີວິດທີ່ຈັບໄດ້ໂດຍ eval ພາຍໃນ - ສືບຕໍ່ວົງພາຍໃນ

ເບິ່ງ cop.h: je_mustcatch, ເມື່ອຕັ້ງຢູ່ໃນລະດັບ runlevel ໃດເປັນ TRUE, ຫມາຍຄວາມວ່າ eval ops ຕ້ອງ.
ສ້າງຕັ້ງ jmpenv ທ້ອງຖິ່ນເພື່ອຈັດການກັບການຍົກເວັ້ນ.

OP* docatch(OP*o)

CV ອ້າງອິງ ການນັບ ແລະ CvOUTSIDE

CvWEAKOUTSIDE
ແຕ່ລະ CV ມີຕົວຊີ້, "CvOUTSIDE()", ຕໍ່ກັບ CV ທີ່ມີ lexically enclosing (ຖ້າມີ).
ເນື່ອງຈາກວ່າຕົວຊີ້ໄປຫາ prototypes ຍ່ອຍທີ່ບໍ່ເປີດເຜີຍຊື່ແມ່ນຖືກເກັບໄວ້ໃນ "&" pad slots, ມັນແມ່ນ.
ເປັນ​ໄປ​ໄດ້​ທີ່​ຈະ​ໄດ້​ຮັບ​ການ​ອ້າງ​ອີງ​ເປັນ​ວົງ​, ກັບ​ພໍ່​ແມ່​ຊີ້​ໄປ​ຫາ​ເດັກ​ນ້ອຍ​ແລະ​
ໃນທາງກັບກັນ. ເພື່ອຫຼີກເວັ້ນການຮົ່ວໄຫຼຂອງຫນ່ວຍຄວາມຈໍາ, ພວກເຮົາບໍ່ໄດ້ເພີ່ມການອ້າງອີງ
ນັບຂອງ CV ຊີ້ໃຫ້ເຫັນໂດຍ "CvOUTSIDE" ໃນ ຫນຶ່ງ ສະເພາະ ຕົວຢ່າງ ວ່າ
ພໍ່ແມ່ມີຊ່ອງສຽບ "&" ຊີ້ກັບຄືນໄປບ່ອນພວກເຮົາ. ໃນກໍລະນີດັ່ງກ່າວນີ້, ພວກເຮົາກໍານົດ
ທຸງ "CvWEAKOUTSIDE" ໃນເດັກ. ນີ້ອະນຸຍາດໃຫ້ພວກເຮົາກໍານົດພາຍໃຕ້ສິ່ງທີ່
ສະຖານະການທີ່ພວກເຮົາຄວນຈະຫຼຸດລົງການ refcount ຂອງພໍ່ແມ່ໃນເວລາທີ່ freeing ໄດ້
ເດັກນ້ອຍ.

ມີຄວາມສັບສົນຕື່ມອີກກັບ subs ທີ່ບໍ່ເປີດເຜີຍຊື່ທີ່ບໍ່ປິດ (ເຊັ່ນນັ້ນ
ຫ້າມອ້າງເຖິງຄຳສັບໃດນຶ່ງທີ່ນອກເໜືອນັ້ນ). ໃນ​ກໍ​ລະ​ນີ​ນີ້​, anonymous ໄດ້​
ຕົ້ນແບບຖືກແບ່ງປັນແທນທີ່ຈະຖືກໂຄນ. ນີ້​ມີ​ຜົນ​ສະ​ທ້ອນ​ທີ່​
ພໍ່ແມ່ອາດຈະໄດ້ຮັບການປົດປ່ອຍໃນຂະນະທີ່ຍັງມີເດັກນ້ອຍທີ່ມີການເຄື່ອນໄຫວ, ຕົວຢ່າງ

BEGIN { $a = ຍ່ອຍ { eval '$x' } }

ໃນກໍລະນີນີ້, BEGIN ຖືກປົດປ່ອຍທັນທີຫຼັງຈາກການປະຕິບັດນັບຕັ້ງແຕ່ບໍ່ມີ
ການອ້າງອິງຢ່າງຫ້າວຫັນກັບມັນ: ຕົ້ນແບບຍ່ອຍຂອງ anon ມີ "CvWEAKOUTSIDE" ຕັ້ງໄວ້ນັບຕັ້ງແຕ່ມັນເປັນ
ບໍ່ແມ່ນການປິດ, ແລະ $a ຊີ້ໃຫ້ເຫັນ CV ດຽວກັນ, ດັ່ງນັ້ນມັນບໍ່ໄດ້ປະກອບສ່ວນເຂົ້າໃນ BEGIN's
refcount ບໍ່ວ່າ. ເມື່ອ $a ຖືກປະຕິບັດ, "eval '$x'" ເຮັດໃຫ້ຕ່ອງໂສ້ຂອງ
"CvOUTSIDE" ທີ່ຈະຕິດຕາມ, ແລະ BEGIN ທີ່ຖືກປົດປ່ອຍແມ່ນເຂົ້າເຖິງ.

ເພື່ອຫຼີກເວັ້ນການນີ້, ທຸກຄັ້ງທີ່ CV ແລະແຜ່ນທີ່ກ່ຽວຂ້ອງຂອງມັນຖືກປົດປ່ອຍ, ທຸກໆ "&" ເຂົ້າໄປໃນ
pad ໄດ້ຖືກໂຍກຍ້າຍຢ່າງຊັດເຈນອອກຈາກ pad, ແລະຖ້າຫາກວ່າການ refcount ຂອງ pointed-to
anon sub ຍັງເປັນບວກ, ຫຼັງຈາກນັ້ນ "CvOUTSIDE" ເດັກນ້ອຍນັ້ນຖືກຕັ້ງໃຫ້ຊີ້ໄປຫາມັນ
ພໍ່ເຖົ້າ. ນີ້ຈະເກີດຂຶ້ນໃນກໍລະນີສະເພາະດຽວຂອງການບໍ່ປິດ
anon prototype ມີຫນຶ່ງຫຼືຫຼາຍກວ່າການອ້າງອິງທີ່ມີການເຄື່ອນໄຫວ (ເຊັ່ນ: $a ຂ້າງເທິງ).

ສິ່ງອື່ນທີ່ຄວນພິຈາລະນາແມ່ນວ່າ CV ອາດຈະເປັນພຽງແຕ່ບໍ່ໄດ້ກໍານົດແທນທີ່ຈະ
ປົດປ່ອຍ, ຕົວຢ່າງ "undef & foo". ໃນກໍລະນີນີ້, refcount ຂອງມັນອາດຈະບໍ່ໄດ້ເຖິງສູນ, ແຕ່
ພວກ​ເຮົາ​ຍັງ​ຈະ​ລົບ pad ແລະ "CvROOT​" ຂອງ​ຕົນ​ແລະ​ອື່ນໆ. ເນື່ອງ​ຈາກ​ວ່າ​ເດັກ​ນ້ອຍ​ຕ່າງໆ​ອາດ​ຈະ​ຍັງ​
ມີ "CvOUTSIDE" ຂອງພວກເຂົາຊີ້ໃສ່ CV ທີ່ບໍ່ໄດ້ກໍານົດນີ້, ພວກເຮົາຮັກສາ "CvOUTSIDE" ຂອງຕົນເອງ.
ໃນເວລານີ້, ດັ່ງນັ້ນລະບົບຕ່ອງໂສ້ຂອງຂອບເຂດຂອງ lexical ແມ່ນ unbroken. ຍົກ​ຕົວ​ຢ່າງ,
ຕໍ່ໄປນີ້ຄວນພິມ 123:

$x ຂອງຂ້ອຍ = 123;
ຍ່ອຍ tmp { ຍ່ອຍ { eval '$x' } }
$a ຂອງຂ້ອຍ = tmp();
undef &tmp;
ພິມ $a->();

bool CvWEAKOUTSIDE(CV *cv)

ການຝັງ ຫນ້າທີ່

cv_dump ຖິ້ມເນື້ອໃນຂອງ CV

void cv_dump(CV *cv, const char *title)

cv_forget_slab
ເມື່ອ CV ມີການນັບອ້າງອີງໃສ່ຝາອັດປາກຂຸມຂອງມັນ (CvSLABBED), ມັນຮັບຜິດຊອບ
ໃຫ້ແນ່ໃຈວ່າມັນຖືກປົດປ່ອຍ. (ເພາະສະນັ້ນ, ບໍ່ມີສອງ CVs ຄວນມີເອກະສານອ້າງອີງ
ຝາອັດປາກຂຸມດຽວກັນ.) CV ພຽງແຕ່ຕ້ອງການອ້າງອີງຝາອັດປາກຂຸມໃນລະຫວ່າງການລວບລວມ. ຄັ້ງດຽວ
ມັນຖືກລວບລວມແລະຕິດ CvROOT, ມັນໄດ້ສໍາເລັດວຽກຂອງມັນ, ດັ່ງນັ້ນມັນສາມາດລືມໄດ້
ຝາອັດປາກຂຸມ.

void cv_forget_slab(CV *cv)

do_dump_pad
ຖິ້ມເນື້ອໃນຂອງ padlist

void do_dump_pad(ລະດັບ I32, PerlIO *file,
PADLIST *padlist, ເຕັມ)

padlist_dup
ສຳເນົາແຜ່ນຮອງ.

PADLIST * padlist_dup(PADLIST *srcpad,
CLONE_PARAMS *param)

padnamelist_dup
ຊໍ້າກັນບັນຊີລາຍຊື່ຊື່ແຜ່ນ.

PADNAMELIST * padnamelist_dup(PADNAMELIST *srcpad,
CLONE_PARAMS *param)

padname_dup
ຊໍ້າກັນຊື່ແຜ່ນ.

PADNAME * padname_dup(PADNAME *src, CLONE_PARAMS *param)

pad_alloc_name
ຈັດສັນສະຖານທີ່ຢູ່ໃນ pad ລວບລວມປະຈຸບັນ (ຜ່ານ "pad_alloc" ໃນ perlapi) ແລະ
ຫຼັງຈາກນັ້ນເກັບຮັກສາຊື່ສໍາລັບການເຂົ້ານັ້ນ. ຊື່ ຖືກຮັບຮອງເອົາແລະກາຍເປັນຊື່ເຂົ້າ; ມັນ
ຕ້ອງມີສະຕຣິງຊື່ຢູ່ກ່ອນແລ້ວ. ເຄື່ອງພິມ ແລະ ourstash ແລະ
ທຸງ "padadd_STATE" ຖືກເພີ່ມໃສ່ ຊື່. ບໍ່​ມີ​ການ​ປຸງ​ແຕ່ງ​ອື່ນໆ​ຂອງ​
"pad_add_name_pvn" ໃນ perlapi ແມ່ນແລ້ວ. ຕອບຄ່າຊົດເຊີຍຂອງແຜ່ນທີ່ຈັດສັນ
ໂມ້.

PADOFFSET pad_alloc_name(PADNAME *ຊື່, ທຸງ U32,
HV *typestash, HV *ourstash)

pad_block_start
ອັບເດດຕົວແປສະຖານະການລວບລວມຂໍ້ມູນ pad ໃນການເຂົ້າສູ່ບລັອກໃຫມ່.

void pad_block_start(ເຕັມ)

pad_check_dup
ກວດເບິ່ງການປະກາດຊໍ້າກັນ: ລາຍງານໃດໆຂອງ:

* a my ໃນຂອບເຂດປະຈຸບັນທີ່ມີຊື່ດຽວກັນ;
* an our (ບ່ອນ​ໃດ​ກໍ​ຕາມ​ໃນ pad ໄດ້​) ທີ່​ມີ​ຊື່​ດຽວ​ກັນ​ແລະ​
ສະ​ຖານ​ທີ່​ດຽວ​ກັນ​ກັບ C

"is_our" ຊີ້ໃຫ້ເຫັນວ່າຊື່ທີ່ຈະກວດສອບແມ່ນການປະກາດ 'ຂອງພວກເຮົາ'.

void pad_check_dup(PADNAME *ຊື່, U32 ທຸງ,
const HV *ourstash)

pad_findlex
ຊອກຫາ lexical ທີ່ມີຊື່ທຸກບ່ອນໃນລະບົບຕ່ອງໂສ້ຂອງ pads ຮັງ. ຕື່ມການເຂົ້າປອມໃນ
pads ພາຍໃນຖ້າຫາກວ່າມັນໄດ້ຖືກພົບເຫັນຢູ່ໃນຫນຶ່ງນອກ.

ສົ່ງຄ່າຊົດເຊີຍໃນແຜ່ນລຸ່ມສຸດຂອງ lex ຫຼື lex ປອມ. cv ແມ່ນ CV ໃນ
ເຊິ່ງເພື່ອເລີ່ມຕົ້ນການຄົ້ນຫາ, ແລະ seq ແມ່ນ cop_seq ໃນປະຈຸບັນທີ່ຈະກົງກັບ. ຖ້າ
ຄໍາເຕືອນແມ່ນຄວາມຈິງ, ພິມຄໍາເຕືອນທີ່ເຫມາະສົມ. ຄ່າ out_* vars ກັບຄືນ, ແລະອື່ນໆ
ແມ່ນຕົວຊີ້ໄປຫາບ່ອນທີ່ຄ່າກັບຄືນຄວນຖືກເກັບໄວ້. out_capture, ຖ້າບໍ່ແມ່ນ
null, ຮ້ອງຂໍໃຫ້ຕົວຢ່າງ innermost ຂອງ lexical ໄດ້ຖືກ captured; out_name ແມ່ນ
ຕັ້ງເປັນຊື່ pad ທີ່ກົງກັນພາຍໃນທີ່ສຸດຫຼືຊື່ pad ປອມ; out_flags ກັບຄືນ
ທຸງທີ່ປົກກະຕິກ່ຽວຂ້ອງກັບຊ່ອງຂໍ້ມູນ PARENT_FAKELEX_FLAGS ຂອງຊື່ແຜ່ນປອມ.

ໃຫ້ສັງເກດວ່າ pad_findlex() ແມ່ນ recursive; ມັນ recurses ເຖິງລະບົບຕ່ອງໂສ້ຂອງ CVs, ຫຼັງຈາກນັ້ນມາ
ກັບຄືນໄປບ່ອນລົງ, ເພີ່ມລາຍການປອມຕາມທີ່ມັນໄປ. ມັນຕ້ອງເປັນແບບນີ້ເພາະປອມ
ຊື່ໃນ anon protoypes ຈະຕ້ອງເກັບຮັກສາໃນ xlow ດັດຊະນີເຂົ້າໄປໃນ pad ພໍ່ແມ່.

PADOFFSET pad_findlex(const char *namepv,
STRLEN namelen, ທຸງ U32,
const CV* cv, U32 seq, int ເຕືອນ,
SV** out_capture,
PADNAME** out_name,
int *out_flags)

pad_fixup_inner_anons
ສໍາລັບ anon CVs ໃດໆໃນ pad, ປ່ຽນ CvOUTSIDE ຂອງ CV ນັ້ນຈາກ old_cv ເປັນ new_cv ຖ້າ
ຈໍາເປັນ. ຕ້ອງການໃນເວລາທີ່ CV ທີ່ລວບລວມໃຫມ່ຕ້ອງຖືກຍ້າຍໄປຢູ່ໃນ CV ທີ່ມີຢູ່ແລ້ວ
ໂຄງສ້າງ.

void pad_fixup_inner_anons(PADLIST *padlist,
CV *old_cv, CV *new_cv)

pad_free
ປົດປ່ອຍ SV ຢູ່ທີ່ offset po ໃນແຜ່ນປະຈຸບັນ.

void pad_free(PADOFFSET po)

pad_leavemy
ການເຮັດຄວາມສະອາດໃນຕອນທ້າຍຂອງຂອບເຂດໃນລະຫວ່າງການລວບລວມ: ກໍານົດຈໍານວນ seq ສູງສຸດສໍາລັບ lexicals ໃນ
ຂອບເຂດນີ້ແລະເຕືອນຂອງ lexicals ໃດໆທີ່ບໍ່ເຄີຍໄດ້ຮັບການນໍາສະເຫນີ.

void pad_leavemy()

pad_push
ຍູ້ກອບແຜ່ນໃໝ່ໃສ່ແຜ່ນຮອງ, ເວັ້ນເສຍແຕ່ວ່າມີແຜ່ນຮອງຢູ່ຄວາມເລິກນີ້ແລ້ວ,
ໃນກໍລະນີໃດກໍ່ຕາມ, ຢ່າລົບກວນການສ້າງອັນໃຫມ່. ຈາກນັ້ນໃຫ້ແທັບໃໝ່ໃສ່ @_ ເຂົ້າໄປ
ສະລັອດຕິງສູນ.

void pad_push(PADLIST *padlist, ຄວາມເລິກ int)

pad_reset
ໝາຍທັງໝົດປັດຈຸບັນຊົ່ວຄາວເພື່ອໃຊ້ຄືນໃໝ່

void pad_reset()

pad_swipe
ປະຖິ້ມ tmp ໃນແຜ່ນປະຈຸບັນຢູ່ທີ່ offset po ແລະປ່ຽນແທນດ້ວຍອັນໃຫມ່.

void pad_swipe(PADOFFSET po, bool refadjust)

GV ຫນ້າທີ່

gv_try_downgrade
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ຖ້າ typeglob "gv" ສາມາດສະແດງອອກໄດ້ຊັດເຈນກວ່າ, ໂດຍການມີບາງສິ່ງບາງຢ່າງອື່ນ
ກ່ວາ GV ທີ່ແທ້ຈິງຢູ່ໃນສະຖານທີ່ຂອງມັນຢູ່ໃນ stash, ທົດແທນມັນດ້ວຍຮູບແບບທີ່ດີທີ່ສຸດ.
ຂໍ້ກໍານົດພື້ນຖານສໍາລັບການນີ້ແມ່ນວ່າ "gv" ເປັນ typeglob ທີ່ແທ້ຈິງ, ແມ່ນພຽງພໍ
ທໍາມະດາ, ແລະພຽງແຕ່ອ້າງອີງຈາກຊຸດຂອງມັນ. ຫນ້າທີ່ນີ້ແມ່ນຫມາຍຄວາມວ່າ
ໃຊ້ໃນເວລາທີ່ GV ໄດ້ຖືກຊອກຫາຢູ່ໃນສ່ວນຫນຶ່ງເພື່ອເບິ່ງວ່າມີຫຍັງ, ເຊິ່ງກໍ່ໃຫ້ເກີດ
ການປັບປຸງ, ແຕ່ອີງໃສ່ສິ່ງທີ່ພົບເຫັນ, ມັນ turns ໃຫ້ເຫັນວ່າ GV ທີ່ແທ້ຈິງບໍ່ແມ່ນ
ຕ້ອງການຫຼັງຈາກທັງຫມົດ.

ຖ້າ "gv" ເປັນ typeglob ຫວ່າງເປົ່າ, ມັນຈະຖືກລຶບອອກຈາກ stash.

ຖ້າ "gv" ເປັນ typeglob ທີ່ມີພຽງສ່ວນຍ່ອຍຄົງທີ່ທີ່ພຽງພໍ-ທຳມະດາ, the
typeglob ຖືກແທນທີ່ດ້ວຍຕົວຍຶດການອ້າງອິງ scalar ທີ່ຫນາແຫນ້ນກວ່າ
ເປັນຕົວແທນຂອງສິ່ງດຽວກັນ.

void gv_try_downgrade(GV* gv)

Hash ການຈັດການ ຫນ້າທີ່

hv_ename_add
ເພີ່ມຊື່ໃສ່ລາຍຊື່ພາຍໃນຂອງ stash ຂອງຊື່ທີ່ມີປະສິດທິພາບ. ເບິ່ງ "hv_ename_delete".

ອັນນີ້ເອີ້ນວ່າເມື່ອ stash ຖືກມອບໝາຍໃຫ້ສະຖານທີ່ໃໝ່ໃນຕາຕະລາງສັນຍາລັກ.

void hv_ename_add(HV *hv, const char *name, U32 len,
ທຸງ U32)

hv_ename_delete
ລຶບຊື່ອອກຈາກລາຍຊື່ພາຍໃນຂອງ stash ຂອງຊື່ທີ່ມີປະສິດທິພາບ. ຖ້ານີ້ແມ່ນ
ຊື່ທີ່ສົ່ງຄືນໂດຍ "HvENAME", ຫຼັງຈາກນັ້ນຊື່ອື່ນໃນບັນຊີລາຍຊື່ຈະເອົາແທນຂອງມັນ
("HvENAME" ຈະໃຊ້ມັນ).

ອັນນີ້ເອີ້ນວ່າເມື່ອ stash ຖືກລຶບອອກຈາກຕາຕະລາງສັນຍາລັກ.

void hv_ename_delete(HV *hv, const char *ຊື່,
U32 ເລນ, ທຸງ U32)

refcounted_he_chain_2hv
ສ້າງ ແລະສົ່ງຄືນ "HV *" ທີ່ເປັນຕົວແທນຂອງເນື້ອຫາຂອງ "refcounted_he"
ລະບົບຕ່ອງໂສ້. ທົງ ປະຈຸບັນບໍ່ໄດ້ໃຊ້ ແລະຕ້ອງເປັນສູນ.

HV * refcounted_he_chain_2hv(
const struct refcounted_he *c, U32 ທຸງ
)

refcounted_he_fetch_pv
ເຊັ່ນດຽວກັບ "refcounted_he_fetch_pvn", ແຕ່ໃຊ້ສະຕຣິງທີ່ເປັນ nul-terminated ແທນ
ຄູ່ສາຍ/ຄວາມຍາວ.

SV * refcounted_he_fetch_pv(
const struct refcounted_he *ຕ່ອງໂສ້,
const char *key, U32 hash, U32 flags
)

refcounted_he_fetch_pvn
ຄົ້ນຫາຕາມລະບົບຕ່ອງໂສ້ "refcounted_he" ສໍາລັບການເຂົ້າທີ່ມີລະຫັດທີ່ລະບຸໄວ້ໂດຍ keypv
ແລະ ກະແຈທີ່ຢູ່ ຖ້າຫາກວ່າ ທົງ ມີ "REFCOUNTED_HE_KEY_UTF8" ບິດທີ່ກໍານົດໄວ້, octets ທີ່ສໍາຄັນແມ່ນ
ແປເປັນ UTF-8, ຖ້າບໍ່ດັ່ງນັ້ນພວກມັນຈະຖືກຕີຄວາມໝາຍເປັນລາຕິນ-1. hash ເປັນ
hash precomputed ຂອງ key string, ຫຼືສູນຖ້າຫາກວ່າມັນບໍ່ໄດ້ຖືກ precomputed.
ໃຫ້ຜົນເປັນຕາຕະລາງມະຕະທີ່ເປັນຕົວແທນຂອງຄ່າທີ່ກ່ຽວຂ້ອງກັບກະແຈ, ຫຼື
&PL_sv_placeholder ຖ້າບໍ່ມີຄ່າທີ່ກ່ຽວຂ້ອງກັບກະແຈ.

SV * refcounted_he_fetch_pvn(
const struct refcounted_he *ຕ່ອງໂສ້,
const char *keypv, STRLEN keylen, U32 hash,
ທຸງ U32
)

refcounted_he_fetch_pvs
ເຊັ່ນດຽວກັນກັບ "refcounted_he_fetch_pvn", ແຕ່ໃຊ້ຕົວຫນັງສືແທນ a
ຄູ່ສະຕຣິງ/ຄວາມຍາວ, ແລະບໍ່ມີ hash precomputed.

SV * refcounted_he_fetch_pvs(
const struct refcounted_he *ຕ່ອງໂສ້,
const char *key, ທຸງ U32
)

refcounted_he_fetch_sv
ເຊັ່ນດຽວກັບ "refcounted_he_fetch_pvn", ແຕ່ໃຊ້ Perl scalar ແທນ string/length.
ຄູ່.

SV * refcounted_he_fetch_sv(
const struct refcounted_he *chain, SV *key,
U32 hash, U32 ທຸງ
)

refcounted_he_free
ຫຼຸດຈຳນວນການອ້າງອີງຂອງ "refcounted_he" ລົງເທື່ອດຽວ. ຖ້າຫາກວ່າການອ້າງອິງ
count ຮອດສູນຄວາມຊົງຈໍາຂອງໂຄງສ້າງໄດ້ຖືກປົດປ່ອຍ, ເຊິ່ງ (recursively) ເຮັດໃຫ້ເກີດ a
ການຫຼຸດຜ່ອນການນັບອ້າງອີງຂອງພໍ່ແມ່ "refcounted_he". ມັນປອດໄພທີ່ຈະຜ່ານ a
null pointer to this function: ບໍ່ມີການປະຕິບັດໃດໆເກີດຂຶ້ນໃນກໍລະນີນີ້.

void refcounted_he_free(ໂຄງສ້າງ refcounted_he *he)

refcounted_he_inc
ເພີ່ມຈຳນວນອ້າງອີງຂອງ "refcounted_he". ຕົວຊີ້ໄປຫາ
"refcounted_he" ຍັງຖືກສົ່ງຄືນ. ມັນປອດໄພທີ່ຈະຜ່ານຕົວຊີ້ null ໄປນີ້
ຟັງຊັນ: ບໍ່ມີການດໍາເນີນການໃດໆເກີດຂຶ້ນແລະຕົວຊີ້ null ຖືກສົ່ງຄືນ.

struct refcounted_he * refcounted_he_inc(
struct refcounted_he *ເຂົາ
)

refcounted_he_new_pv
ເຊັ່ນດຽວກັບ "refcounted_he_new_pvn", ແຕ່ໃຊ້ string ທີ່ເປັນ nul-terminated ແທນ a
ຄູ່ສາຍ/ຄວາມຍາວ.

struct refcounted_he * refcounted_he_new_pv(
struct refcounted_he *ພໍ່ແມ່,
const char *key, U32 hash,
SV *value, ທຸງ U32
)

refcounted_he_new_pvn
ສ້າງ "refcounted_he". ອັນນີ້ປະກອບດ້ວຍຄູ່ຄີ/ຄ່າອັນດຽວ ແລະ a
ການອ້າງອີງເຖິງລະບົບຕ່ອງໂສ້ "refcounted_he" ທີ່ມີຢູ່ແລ້ວ (ເຊິ່ງອາດຈະຫວ່າງເປົ່າ), ແລະດັ່ງນັ້ນ
ປະກອບເປັນລະບົບຕ່ອງໂສ້ຍາວ. ເມື່ອໃຊ້ຕ່ອງໂສ້ທີ່ຍາວກວ່າ, ຄູ່ຄີ/ຄ່າໃໝ່ໃຊ້ເວລາ
ສຳຄັນກວ່າການເຂົ້າໃດໆກໍຕາມສຳລັບກະແຈດຽວກັນຕໍ່ໄປຕາມລະບົບຕ່ອງໂສ້.

ລະຫັດໃຫມ່ແມ່ນກໍານົດໂດຍ keypv ແລະ ກະແຈທີ່ຢູ່ ຖ້າຫາກວ່າ ທົງ ມີຂອງ
"REFCOUNTED_HE_KEY_UTF8" ບິດ, octets ທີ່ສໍາຄັນຖືກຕີຄວາມຫມາຍເປັນ UTF-8,
ຖ້າບໍ່ດັ່ງນັ້ນພວກມັນຖືກຕີຄວາມວ່າເປັນລາຕິນ-1. hash ເປັນ hash precomputed ຂອງທີ່ສໍາຄັນ
string, ຫຼືສູນຖ້າມັນບໍ່ໄດ້ຖືກຄິດໄລ່ລ່ວງໜ້າ.

ມູນຄ່າ ແມ່ນ​ຄ່າ​ສະ​ເກັດ​ລາ​ທີ່​ຈະ​ເກັບ​ຮັກ​ສາ​ສໍາ​ລັບ​ກະ​ແຈ​ນີ້​. ມູນຄ່າ ຖືກຄັດລອກໂດຍນີ້
ຫນ້າທີ່, ຊຶ່ງດັ່ງນັ້ນຈຶ່ງບໍ່ໄດ້ເປັນເຈົ້າຂອງການອ້າງອີງໃດໆກັບມັນ, ແລະຕໍ່ມາ
ການ​ປ່ຽນ​ແປງ​ສະ​ເກັດ​ເງິນ​ຈະ​ບໍ່​ໄດ້​ຮັບ​ການ​ສະ​ທ້ອນ​ໃຫ້​ເຫັນ​ໃນ​ຄ່າ​ທີ່​ສັງ​ເກດ​ເຫັນ​ໃນ​
"refcounted_he". ປະເພດທີ່ຊັບຊ້ອນຂອງ scalar ຈະບໍ່ຖືກເກັບໄວ້ດ້ວຍການອ້າງອີງ
ຄວາມຊື່ສັດ, ແຕ່ຈະຖືກບັງຄັບໃຫ້ສາຍ. ມູນຄ່າ ອາດຈະເປັນ null ຫຼື
&PL_sv_placeholder ເພື່ອຊີ້ບອກວ່າບໍ່ມີຄ່າທີ່ຈະເຊື່ອມໂຍງກັບກະແຈ;
ອັນນີ້, ເຊັ່ນດຽວກັບຄ່າທີ່ບໍ່ແມ່ນ null, ມີຄວາມສຳຄັນກວ່າການມີຢູ່ຂອງຄ່າ
ສໍາລັບທີ່ສໍາຄັນຕໍ່ໄປຕາມລະບົບຕ່ອງໂສ້.

ພໍ່ແມ່ ຊີ້ໃຫ້ເຫັນສ່ວນທີ່ເຫຼືອຂອງລະບົບຕ່ອງໂສ້ "refcounted_he" ທີ່ຈະຕິດກັບໃຫມ່
"refcounted_he". ຟັງຊັນນີ້ໃຊ້ເວລາຄວາມເປັນເຈົ້າຂອງຫນຶ່ງອ້າງອີງເຖິງ ພໍ່ແມ່, ແລະ
ສົ່ງຄືນການອ້າງອີງອັນໜຶ່ງໃຫ້ກັບ "refcounted_he".

struct refcounted_he * refcounted_he_new_pvn(
struct refcounted_he *ພໍ່ແມ່,
const char *keypv,
ກະແຈ STRLEN, U32 hash,
SV *value, ທຸງ U32
)

refcounted_he_new_pvs
ຄືກັບ "refcounted_he_new_pvn", ແຕ່ໃຊ້ຕົວໜັງສືແທນ a
ຄູ່ສະຕຣິງ/ຄວາມຍາວ, ແລະບໍ່ມີ hash precomputed.

struct refcounted_he * refcounted_he_new_pvs(
struct refcounted_he *ພໍ່ແມ່,
const char *key, SV *value,
ທຸງ U32
)

refcounted_he_new_sv
ເຊັ່ນດຽວກັບ "refcounted_he_new_pvn", ແຕ່ໃຊ້ Perl scalar ແທນ string/length.
ຄູ່.

struct refcounted_he * refcounted_he_new_sv(
struct refcounted_he *ພໍ່ແມ່,
SV *key, U32 hash, SV *value,
ທຸງ U32
)

IO ຫນ້າທີ່

start_glob
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ຟັງຊັນທີ່ເອີ້ນວ່າ "do_readline" ເພື່ອຂະຫຍາຍໂລກ (ຫຼືເຮັດ glob ພາຍໃນ perl on
VMS). ລະຫັດນີ້ເຄີຍຢູ່ໃນແຖວ, ແຕ່ຕອນນີ້ perl ໃຊ້ "File::Glob" ໂລກນີ້
starter ຖືກນໍາໃຊ້ໂດຍ miniperl ເທົ່ານັ້ນໃນລະຫວ່າງຂະບວນການສ້າງ. ການເຄື່ອນຍ້າຍມັນອອກໄປຈະຫຼຸດລົງ
pp_hot.c ; ການຫົດຕົວ pp_hot.c ຊ່ວຍເລັ່ງ perl.

PerlIO* start_glob(SV *tmpglob, IO *io)

ເລີເຊີ ການໂຕ້ຕອບ

validate_proto
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ຟັງຊັນນີ້ປະຕິບັດການກວດສອບ syntax ໃນຕົ້ນແບບ, "proto". ຖ້າ "ເຕືອນ" ແມ່ນ
ແທ້ຈິງແລ້ວ, ຕົວອັກສອນທີ່ຜິດກົດໝາຍ ຫຼືວົງເລັບທີ່ບໍ່ກົງກັນຈະເຮັດໃຫ້ເກີດຄວາມຜິດກົດໝາຍ
ການເຕືອນໄພ, ປະກາດວ່າພວກເຂົາຖືກກວດພົບໃນຕົ້ນແບບສໍາລັບ "ຊື່".

ຄ່າກັບຄືນແມ່ນ "ຄວາມຈິງ" ຖ້ານີ້ແມ່ນຕົວແບບທີ່ຖືກຕ້ອງ, ແລະ "ບໍ່ຖືກຕ້ອງ" ຖ້າມັນບໍ່ແມ່ນ,
ໂດຍບໍ່ຄໍານຶງເຖິງວ່າ "ເຕືອນ" ແມ່ນ "ຈິງ" ຫຼື "ຜິດ".

ໃຫ້ສັງເກດວ່າ "NULL" ແມ່ນ "proto" ທີ່ຖືກຕ້ອງແລະຈະກັບຄືນ "ຈິງ".

ໝາຍເຫດ: ແບບຟອມ perl_ ຂອງຟັງຊັນນີ້ຖືກຍົກເລີກ.

bool validate_proto(SV *ຊື່, SV *proto, bool warn)

magical ຫນ້າທີ່

magic_clearhint
ກະຕຸ້ນໂດຍການລຶບອອກຈາກ %^H, ບັນທຶກລະຫັດໃສ່ "PL_compiling.cop_hints_hash".

int magic_clearhint(SV* sv, MAGIC* mg)

magic_clearhints
ກະຕຸ້ນໂດຍການລຶບລ້າງ %^H, ຣີເຊັດ "PL_compiling.cop_hints_hash".

int magic_clearhints(SV* sv, MAGIC* mg)

magic_methcall
ຮຽກຮ້ອງວິທີການ magic (ເຊັ່ນ: FETCH).

"sv" ແລະ "mg" ແມ່ນສິ່ງທີ່ຜູກມັດແລະ magic tie.

"meth" ແມ່ນຊື່ຂອງວິທີການໂທຫາ.

"argc" ແມ່ນຈຳນວນຂອງ args (ນອກເໜືອໄປຈາກ $self) ເພື່ອສົ່ງໄປຫາວິທີການ.

"ທຸງ" ສາມາດເປັນ:

G_DISCARD ເອີ້ນວິທີການທີ່ມີທຸງ G_DISCARD ແລະບໍ່
ສົ່ງຄືນຄ່າ
G_UNDEF_FILL ຕື່ມຂໍ້ມູນໃສ່ stack ດ້ວຍຕົວຊີ້ argc ຫາ
PL_sv_undef

ການໂຕ້ຖຽງຕົວຂອງມັນເອງແມ່ນຄ່າໃດໆຕາມການໂຕ້ຖຽງ "ທຸງ".

ສົ່ງຄືນ SV (ຖ້າມີ) ສົ່ງຄືນໂດຍວິທີການ, ຫຼື NULL ໃນຄວາມລົ້ມເຫລວ.

SV* magic_methcall(SV *sv, const MAGIC *mg,
SV *meth, ທຸງ U32, U32 argc,
... )

magic_setint
ກະຕຸ້ນໂດຍຮ້ານຄ້າໄປຫາ %^H, ບັນທຶກຄູ່ຄີ/ຄ່າໄປຫາ
"PL_compiling.cop_hints_hash". ມັນສົມມຸດວ່າຄໍາແນະນໍາບໍ່ໄດ້ເກັບຮັກສາຫຍັງໄວ້
ທີ່ຈະຕ້ອງການສໍາເນົາເລິກ. ບາງທີພວກເຮົາຄວນເຕືອນຖ້າພວກເຮົາຊອກຫາເອກະສານອ້າງອີງ.

int magic_sethint(SV* sv, MAGIC* mg)

mg_localize
ຄັດລອກບາງສ່ວນຂອງ magic ຈາກ SV ທີ່ມີຢູ່ແລ້ວໄປຫາສະບັບພາສາທ້ອງຖິ່ນໃຫມ່ຂອງ SV ນັ້ນ.
ຄອນເທນເນີ magic (ເຊັ່ນ: %ENV, $1, tie) ໄດ້ຖືກສຳເນົາ, ຄ່າ magic ບໍ່ມີ (ເຊັ່ນ: taint,
pos).

ຖ້າ setmagic ບໍ່ຖືກຕ້ອງຫຼັງຈາກນັ້ນບໍ່ມີ magic ທີ່ກໍານົດໄວ້ໃນ SV ໃຫມ່ (ຫວ່າງເປົ່າ). ນີ້
ໂດຍປົກກະຕິຫມາຍຄວາມວ່າການມອບຫມາຍຈະປະຕິບັດຕາມໃນໄວໆນີ້ (ເຊັ່ນ: 'ທ້ອງຖິ່ນ $x = $y'), ແລະນັ້ນ
ຈະຈັດການ magic ໄດ້.

void mg_localize(SV* sv, SV* nsv, bool setmagic)

Miscellaneous ຫນ້າທີ່

free_c_backtrace
ຈັດສັນ backtrace ທີ່ໄດ້ຮັບຈາກ get_c_bracktrace.

void free_c_backtrace(Perl_c_backtrace* bt)

get_c_backtrace
ລວບລວມ backtrace (ເອີ້ນວ່າ "stacktrace") ເຂົ້າໄປໃນ buffer malloced ເສັ້ນດຽວ,
ເຊິ່ງຜູ້ໂທ ຕ້ອງ Perl_free_c_backtrace().

ສະແກນເຟຣມຄືນໂດຍຄວາມເລິກ + ຂ້າມ, ຈາກນັ້ນວາງຕົວຂ້າມເຂົ້າໄປຂ້າງໃນທີ່ສຸດ, ກັບຄືນຢູ່ທີ່
ຂອບຄວາມເລິກທີ່ສຸດ.

Perl_c_backtrace* get_c_backtrace(int max_depth,
ຂ້າມ)

MRO ຫນ້າທີ່

mro_get_linear_isa_dfs
ໃຫ້ຜົນເປັນເສັ້ນຊື່ການຄົ້ນຫາຄວາມເລິກ-First ຂອງ @ISA stash ທີ່ໃຫ້. ກັບຄືນ
ຄ່າແມ່ນ AV ແບບອ່ານເທົ່ານັ້ນ*. "ລະດັບ" ຄວນຈະເປັນ 0 (ມັນຖືກນໍາໃຊ້ພາຍໃນໃນນີ້
ການເອີ້ນຄືນຂອງຟັງຊັນ).

ທ່ານມີຄວາມຮັບຜິດຊອບຕໍ່ "SvREFCNT_inc()" ໃນມູນຄ່າກັບຄືນຖ້າທ່ານວາງແຜນທີ່ຈະເກັບຮັກສາ
ມັນຢູ່ບ່ອນໃດກໍໄດ້ເຄິ່ງຖາວອນ (ຖ້າບໍ່ດັ່ງນັ້ນມັນອາດຈະຖືກລຶບອອກຈາກພາຍໃຕ້ທ່ານ
ໃນຄັ້ງຕໍ່ໄປ cache ບໍ່ຖືກຕ້ອງ).

AV* mro_get_linear_isa_dfs(HV* stash, ລະດັບ U32)

mro_isa_changed_in
ດໍາເນີນຂັ້ນຕອນທີ່ຈໍາເປັນ (cache invalidations, ສ່ວນຫຼາຍແມ່ນ) ໃນເວລາທີ່ @ISA ຂອງມອບໃຫ້
ແພັກເກດມີການປ່ຽນແປງ. ຮຽກຮ້ອງໂດຍ "setisa" magic, ບໍ່ຄວນຮຽກຮ້ອງໃຫ້ຮຽກຮ້ອງ
ໂດຍກົງ.

void mro_isa_changed_in(HV* stash)

mro_package_moved
ໂທຫາຟັງຊັນນີ້ເພື່ອສົ່ງສັນຍານຫາບ່ອນເກັບມ້ຽນວ່າມັນໄດ້ຖືກມອບໝາຍໃຫ້ບ່ອນອື່ນແລ້ວ
ຢູ່ໃນລໍາດັບຊັ້ນເກັບມ້ຽນ. "stash" ແມ່ນ stash ທີ່ໄດ້ຖືກມອບຫມາຍ. "ເກົ່າ"
ແມ່ນບ່ອນເກັບມ້ຽນທີ່ມັນປ່ຽນແທນ, ຖ້າມີ. "gv" ແມ່ນໂລກທີ່ເປັນຈິງ
ການ​ມອບ​ຫມາຍ​ໃຫ້.

ນີ້ຍັງສາມາດເອີ້ນວ່າມີການໂຕ້ຖຽງທໍາອິດ null ເພື່ອຊີ້ໃຫ້ເຫັນວ່າ "oldstash" ມີ
ຖືກລຶບແລ້ວ.

ຟັງຊັນນີ້ເຮັດໃຫ້ isa cache ຢູ່ໃນ stash ເກົ່າ, ໃນທຸກແພັກເກັດຍ່ອຍທີ່ວາງໄວ້
ພາຍໃນມັນ, ແລະຢູ່ໃນ subclasses ຂອງທັງຫມົດເຫຼົ່ານັ້ນ, ລວມທັງການຫຸ້ມຫໍ່ທີ່ບໍ່ມີຢູ່ແລ້ວ
ທີ່ມີລາຍການທີ່ສອດຄ້ອງກັນໃນ "stash".

ມັນຍັງກໍານົດຊື່ທີ່ມີປະສິດທິພາບ ("HvENAME") ໃນ stashes ທັງຫມົດຕາມຄວາມເຫມາະສົມ.

ຖ້າ "gv" ມີຢູ່ແລະບໍ່ຢູ່ໃນຕາຕະລາງສັນຍາລັກ, ຫຼັງຈາກນັ້ນ, ຫນ້າທີ່ນີ້ງ່າຍດາຍ
ກັບຄືນ. ການກວດສອບນີ້ຈະຖືກຂ້າມຖ້າ "ທຸງ & 1".

void mro_package_moved(HV * const stash,
HV * const oldstash,
const GV * const gv,
ທຸງ U32)

Optree ການຈັດການ ຫນ້າທີ່

finalize_optree
ຟັງຊັນນີ້ເຮັດໃຫ້ທາງເລືອກສຸດທ້າຍ. ຄວນຈະຖືກເອີ້ນໂດຍກົງຫຼັງຈາກສໍາເລັດ
optree ຖືກສ້າງຂຶ້ນ. ມັນເຮັດການກວດສອບເພີ່ມເຕີມບາງຢ່າງທີ່ບໍ່ສາມາດເຮັດໄດ້ໃນ
ຟັງຊັນ ck_xxx ປົກກະຕິແລະເຮັດໃຫ້ເສັ້ນດ້າຍຕົ້ນໄມ້ປອດໄພ.

void finalize_optree(OP* o)

Pad ຂໍ້ມູນ ໂຄງສ້າງ

CX_CURPAD_SAVE
ບັນທຶກແຜ່ນປະຈຸບັນໃນໂຄງສ້າງບລັອກບໍລິບົດທີ່ໃຫ້ໄວ້.

ໂມດ CX_CURPAD_SAVE(ໂຄງສ້າງ)

CX_CURPAD_SV
ເຂົ້າເຖິງ SV ຢູ່ທີ່ offset po ໃນແຜ່ນປະຈຸບັນທີ່ບັນທຶກໄວ້ໃນບລັອກບໍລິບົດທີ່ໃຫ້
ໂຄງສ້າງ (ສາມາດໃຊ້ເປັນມູນຄ່າ).

SV * CX_CURPAD_SV(ໂຄງສ້າງ, PADOFFSET po)

PadnameIsOUR
ບໍ່ວ່າຈະເປັນຕົວແປ "ຂອງພວກເຮົາ" ຫຼືບໍ່.

bool PadnameIsOUR(PADNAME pn)

PadnameIsSTATE
ບໍ່ວ່າຈະເປັນຕົວແປ "ລັດ".

bool PadnameIsSTATE(PADNAME pn)

PadnameOURSTASH
stash ທີ່ຕົວແປ "ຂອງພວກເຮົາ" ນີ້ໄດ້ຖືກປະກາດ.

HV * PadnameOURSTASH()

PadnameOUTER
ບໍ່ວ່າລາຍການນີ້ເປັນຂອງແຜ່ນນອກ. ການ​ເຂົ້າ​ມາ​ທີ່​ນີ້​ແມ່ນ​ຄວາມ​ຈິງ​ແມ່ນ​
ມັກຈະເອີ້ນວ່າ 'ປອມ'.

bool PadnameOUTER(PADNAME pn)

PadnameTYPE
stash ທີ່ກ່ຽວຂ້ອງກັບ lexical ພິມ. ນີ້ສົ່ງຄືນຄ່າ %Foo:: hash ສໍາລັບ "my
Foo $bar".

HV * PadnameTYPE(PADNAME pn)

PAD_BASE_SV
ເອົາຄ່າຈາກຊ່ອງໃສ່ "po" ໃນຖານ (DEPTH=1) pad ຂອງ padlist

SV * PAD_BASE_SV(PADLIST padlist, PADOFFSET po)

PAD_CLONE_VARS
Clone ຕົວແປຂອງລັດທີ່ກ່ຽວຂ້ອງກັບການແລ່ນແລະການລວບລວມແຜ່ນ.

ຫວ່າງ PAD_CLONE_VARS(PerlInterpreter *proto_perl,
CLONE_PARAMS* ພາຣາມ)

PAD_COMPNAME_FLAGS
ກັບຄືນທຸງສໍາລັບຊື່ pad ການລວບລວມປະຈຸບັນຢູ່ທີ່ offset "po". ຖືວ່າ ກ
ຊ່ອງເຂົ້າທີ່ຖືກຕ້ອງ.

U32 PAD_COMPNAME_FLAGS(PADOFFSET ໂປ)

PAD_COMPNAME_GEN
ຈໍານວນການຜະລິດຂອງຊື່ທີ່ຊົດເຊີຍ "po" ໃນແຜ່ນລວບລວມປະຈຸບັນ
(ມູນຄ່າ). ໃຫ້ສັງເກດວ່າ "SvUVX" ຖືກ hijacked ສໍາລັບຈຸດປະສົງນີ້.

STRLEN PAD_COMPNAME_GEN(PADOFFSET ປໍ)

PAD_COMPNAME_GEN_set
ກໍານົດຈໍານວນການຜະລິດຂອງຊື່ທີ່ offset "po" ໃນ ling pad ໃນປັດຈຸບັນ
(lvalue) ກັບ "gen". ໃຫ້ສັງເກດວ່າ "SvUV_set" ຖືກ hijacked ສໍາລັບຈຸດປະສົງນີ້.

STRLEN PAD_COMPNAME_GEN_set(PADOFFSET po, int gen)

PAD_COMPNAME_OURSTASH
ສົ່ງຄືນ stash ທີ່ກ່ຽວຂ້ອງກັບຕົວແປ "ຂອງພວກເຮົາ". ສົມມຸດວ່າການເຂົ້າຊ່ອງແມ່ນ a
ຖືກຕ້ອງ "ຂອງພວກເຮົາ" lexical.

HV * PAD_COMPNAME_OURSTASH(PADOFFSET po)

PAD_COMPNAME_PV
ກັບຄືນຊື່ຂອງຊື່ແຜ່ນການລວບລວມປະຈຸບັນຢູ່ທີ່ offset "po". ຖືວ່າຖືກຕ້ອງ
ຊ່ອງເຂົ້າ.

char * PAD_COMPNAME_PV(PADOFFSET po)

PAD_COMPNAME_TYPE
ກັບຄືນປະເພດ (stash) ຂອງຊື່ແຜ່ນການລວບລວມປະຈຸບັນຢູ່ທີ່ offset "po". ຕ້ອງເປັນ
ຊື່ທີ່ຖືກຕ້ອງ. ຕອບ null ຖ້າບໍ່ໄດ້ພິມ.

HV * PAD_COMPNAME_TYPE(PADOFFSET po)

PAD_RESTORE_LOCAL
ຟື້ນຟູ pad ເກົ່າທີ່ບັນທຶກໄວ້ໃນ opad ຕົວແປທ້ອງຖິ່ນໂດຍ PAD_SAVE_LOCAL()

ຫວ່າງ PAD_RESTORE_LOCAL(PAD *opad)

PAD_SAVE_LOCAL
ບັນທຶກແຜ່ນປະຈຸບັນໃສ່ oppad ຕົວແປທ້ອງຖິ່ນ, ຫຼັງຈາກນັ້ນເຮັດໃຫ້ແຜ່ນປະຈຸບັນເທົ່າທຽມກັນ
ເພື່ອໃສ່ປາ

ຫວ່າງ PAD_SAVE_LOCAL(PAD *opad, PAD *npad)

PAD_SAVE_SETNULLPAD
ບັນທຶກແຜ່ນປະຈຸບັນຈາກນັ້ນຕັ້ງມັນເປັນ null.

ຫວ່າງ PAD_SAVE_SETNULLPAD()

PAD_SETSV
ກໍານົດຊ່ອງໃສ່ offset "po" ໃນ pad ໃນປັດຈຸບັນເປັນ "sv"

SV * PAD_SETSV(PADOFFSET po, SV* sv)

PAD_SET_CUR
ຕັ້ງຄ່າແຜ່ນປັດຈຸບັນເປັນ pad "n" ໃນ padlist, ຊ່ວຍປະຢັດແຜ່ນປະຈຸບັນທີ່ຜ່ານມາ.
NB ໃນປັດຈຸບັນ macro ນີ້ຂະຫຍາຍໄປເປັນສາຍຍາວເກີນໄປສໍາລັບບາງ compilers, ສະນັ້ນມັນ
ດີທີ່ສຸດເພື່ອທົດແທນມັນ

SAVECOMPPAD();
PAD_SET_CUR_NOSAVE(padlist,n);

ຫວ່າງ PAD_SET_CUR(PADLIST padlist, I32 n)

PAD_SET_CUR_NOSAVE
ເຊັ່ນ PAD_SET_CUR, ແຕ່ບໍ່ມີການປະຫຍັດ

ຫວ່າງ PAD_SET_CUR_NOSAVE(PADLIST padlist, I32 n)

PAD_SV ເອົາຄ່າທີ່ຊົດເຊີຍ "po" ໃນແຜ່ນປະຈຸບັນ

SV * PAD_SV(PADOFFSET po)

PAD_SVl ລຸ້ນນ້ຳໜັກເບົາ ແລະ ມູນຄ່າຂອງ "PAD_SV". ໄດ້ຮັບຫຼືກໍານົດຄ່າທີ່ຊົດເຊີຍ "po"
ໃນ pad ໃນປັດຈຸບັນ. ບໍ່ຄືກັບ "PAD_SV", ບໍ່ໄດ້ພິມການວິນິໄສດ້ວຍ -DX. ສໍາລັບ
ການນໍາໃຊ້ພາຍໃນເທົ່ານັ້ນ.

SV * PAD_SVl(PADOFFSET po)

SAVECLEARSV
ລ້າງຈຸດທີ່ຊີ້ໄປຫາຄ່າ pad ໃນການອອກຂອບເຂດ. (ເຊັ່ນ: runtime action ຂອງ 'my')

SAVECLEARSV(SV **svp) void

SAVECOMPPAD
ບັນທຶກ PL_comppad ແລະ PL_curpad

SAVECOMPPAD() ເປັນໂມຄະ

SAVEPADSV
ບັນທຶກຊ່ອງໃສ່ແຜ່ນ (ໃຊ້ເພື່ອຟື້ນຟູຫຼັງຈາກການເຮັດຊ້ຳ)

XXX DAPM ມັນມີຄວາມໝາຍຫຼາຍກວ່າທີ່ຈະເຮັດໃຫ້ Arg ເປັນ PADOFFSET
SAVEPADSV(PADOFFSET po) ເປັນໂມຄະ

ຕໍ່ນາຍພາສາ Variables

PL_DB ດຽວ
ໃນເວລາທີ່ Perl ຖືກດໍາເນີນການໃນຮູບແບບ debugging, ກັບ -d switch, SV ນີ້ແມ່ນ boolean ທີ່
ຊີ້ບອກວ່າການຍ່ອຍຈະຖືກກ້າວດຽວຫຼືບໍ່. ການກ້າວດຽວແມ່ນອັດຕະໂນມັດ
ເປີດຫຼັງຈາກທຸກຂັ້ນຕອນ. ນີ້ແມ່ນຕົວແປ C ເຊິ່ງກົງກັບ Perl's
$DB::ຕົວແປດຽວ. ເບິ່ງ "PL_DBsub".

SV * PL_DBsingle

PL_DBsub
ໃນເວລາທີ່ Perl ຖືກດໍາເນີນການໃນຮູບແບບ debugging, ກັບ -d ສະຫຼັບ, GV ນີ້ປະກອບດ້ວຍ SV
ເຊິ່ງຖືຊື່ຂອງຍ່ອຍທີ່ຖືກດີບັກ. ນີ້ແມ່ນຕົວແປ C ທີ່
ເທົ່າກັບ Perl's $DB::sub variable. ເບິ່ງ "PL_DBsingle".

GV * PL_DBsub

PL_DBtrace
ຕົວແປການຕິດຕາມທີ່ໃຊ້ໃນເວລາທີ່ Perl ຖືກດໍາເນີນການໃນຮູບແບບການດີບັກ, ດ້ວຍ -d ສະຫຼັບ. ນີ້
ແມ່ນຕົວແປ C ເຊິ່ງກົງກັບຕົວແປຂອງ Perl ຂອງ $DB::trace. ເບິ່ງ
"PL_DBsingle".

SV * PL_DBtrace

PL_down
ຕົວແປ C ທີ່ກົງກັບຕົວແປເຕືອນ $^W ຂອງ Perl.

bool PL_dowarn

PL_last_in_gv
GV ທີ່ຖືກນໍາໃຊ້ຄັ້ງສຸດທ້າຍສໍາລັບການປະຕິບັດການປ້ອນຂໍ້ມູນໄຟລ໌. (" ")

GV* PL_last_in_gv

PL_ofsgv
ໂລກທີ່ມີຕົວແຍກຊ່ອງຂໍ້ມູນຜົນຜະລິດ - "*," ໃນຊ່ອງ Perl.

GV* PL_ofsgv

PL_rs ຕົວແຍກບັນທຶກການປ້ອນຂໍ້ມູນ - $/ ໃນຊ່ອງ Perl.

SV* PL_rs

Stack ການຈັດການ ມາໂຄຣ

djSP ປະກາດພຽງແຕ່ "SP". ອັນນີ້ແມ່ນຄ້າຍຄືກັນກັບ "dSP", ແລະປະກາດສໍາເນົາທ້ອງຖິ່ນ
ຂອງຕົວຊີ້ stack ຂອງ perl, ສາມາດໃຊ້ໄດ້ຜ່ານມະຫາພາກ "SP". ເບິ່ງ "SP". (ມີໃຫ້ສໍາລັບ
ຄວາມເຂົ້າກັນໄດ້ຂອງລະຫັດແຫຼ່ງກັບຄືນໄປບ່ອນກັບຮູບແບບກະທູ້ເກົ່າ (Perl 5.005).

djSP;

LVRET True ຖ້າ op ນີ້ຈະເປັນຄ່າຕອບແທນຂອງລາຍການຍ່ອຍ lvalue

SV ການຈັດການ ຫນ້າທີ່

SV (ຫຼື AV, HV, ແລະອື່ນໆ) ຖືກຈັດສັນເປັນສອງສ່ວນ: ຫົວ (ໂຄງສ້າງ sv, av, hv ... )
ປະ​ກອບ​ດ້ວຍ​ຂໍ້​ມູນ​ການ​ນັບ​ປະ​ເພດ​ແລະ​ການ​ອ້າງ​ອີງ​, ແລະ​ສໍາ​ລັບ​ຫຼາຍ​ປະ​ເພດ​, ຕົວ​ຊີ້​ກັບ​ຮ່າງ​ກາຍ​
(struct xrv, xpv, xpviv...), ເຊິ່ງປະກອບດ້ວຍຊ່ອງຂໍ້ມູນສະເພາະແຕ່ລະປະເພດ. ບາງປະເພດ
ເກັບຮັກສາສິ່ງທີ່ພວກເຂົາຕ້ອງການຢູ່ໃນຫົວ, ດັ່ງນັ້ນບໍ່ມີຮ່າງກາຍ.

ໃນທັງໝົດແຕ່ການກຳນົດຄ່າຄວາມຊົງຈຳທີ່ແປກປະຫຼາດທີ່ສຸດ (ເຊັ່ນ: PURIFY), ຫົວ ແລະຮ່າງກາຍແມ່ນ.
ຈັດສັນອອກຈາກສະຫນາມກິລາ, ເຊິ່ງໂດຍຄ່າເລີ່ມຕົ້ນແມ່ນປະມານ 4K chunks ຂອງຫນ່ວຍຄວາມຈໍາ parceled
ຂຶ້ນເປັນ N ຫົວຫຼືຮ່າງກາຍ. Sv-bodies ຖືກຈັດສັນໂດຍປະເພດ sv ຂອງພວກເຂົາ, ຮັບປະກັນຂະຫນາດ
ຄວາມສອດຄ່ອງທີ່ຈໍາເປັນເພື່ອຈັດສັນຢ່າງປອດໄພຈາກ arrays.

ສໍາລັບ SV-heads, ສະລັອດຕິງທໍາອິດໃນແຕ່ລະສະຫນາມກິລາໄດ້ຖືກສະຫງວນ, ແລະຖືການເຊື່ອມຕໍ່ໄປຫາຕໍ່ໄປ
ສະຫນາມກິລາ, ທຸງບາງ, ແລະບັນທຶກຂອງຈໍານວນຂອງສະລັອດຕິງ. Snaked ຜ່ານລະບົບຕ່ອງໂສ້ນາມຫລິ້ນກິລາແຕ່ລະຄົນແມ່ນ
ບັນຊີລາຍຊື່ທີ່ເຊື່ອມໂຍງຂອງລາຍການຟຣີ; ໃນເວລາທີ່ນີ້ກາຍເປັນຫວ່າງເປົ່າ, ນາມຫລິ້ນກິລາພິເສດໄດ້ຖືກຈັດສັນແລະ
ແບ່ງອອກເປັນ N ລາຍການທີ່ຖືກຈັດໃສ່ໃນບັນຊີລາຍຊື່ຟຣີ.

SV-bodies ແມ່ນຄ້າຍຄືກັນ, ແຕ່ພວກເຂົາໃຊ້ arena-sets ໂດຍຄ່າເລີ່ມຕົ້ນ, ເຊິ່ງແຍກການເຊື່ອມຕໍ່ແລະ
ຂໍ້​ມູນ​ຈາກ​ສະ​ຫນາມ​ກິ​ລາ​ຕົວ​ຂອງ​ມັນ​ເອງ​, ແລະ​ຮຽກ​ຮ້ອງ​ເອົາ​ຊ່ອງ​ທີ 1 ໃນ​ສະ​ຫນາມ​ກິ​ລາ​ໄດ້​. SV-bodies ແມ່ນຕື່ມອີກ
ອະທິບາຍຕໍ່ມາ.

ຕົວແປທົ່ວໂລກຕໍ່ໄປນີ້ແມ່ນກ່ຽວຂ້ອງກັບສະຫນາມກິລາ:

PL_sv_arenaroot ຕົວຊີ້ໄປຫາລາຍຊື່ SV arenas
PL_sv_root ຕົວຊີ້ໄປຫາລາຍຊື່ໂຄງສ້າງ SV ຟຣີ

PL_body_arenas ຫົວຫນ້າຂອງ linked-list of body arenas
PL_body_roots[] array ຂອງຕົວຊີ້ໄປຫາບັນຊີລາຍຊື່ຂອງອົງການຈັດຕັ້ງຟຣີຂອງ svtype
arrays ຖືກດັດສະນີໂດຍ svtype ທີ່ຕ້ອງການ

ຫົວຫນ້າ SV ພິເສດຈໍານວນຫນ້ອຍບໍ່ໄດ້ຖືກຈັດສັນຈາກສະຫນາມກິລາ, ແຕ່ແທນທີ່ຈະສ້າງໂດຍກົງ
ໃນໂຄງສ້າງນາຍພາສາ, ຕົວຢ່າງ PL_sv_undef. ຂະຫນາດຂອງ arenas ສາມາດມີການປ່ຽນແປງຈາກ
ຄ່າເລີ່ມຕົ້ນໂດຍການຕັ້ງຄ່າ PERL_ARENA_SIZE ຢ່າງເໝາະສົມໃນເວລາລວບລວມ.

ສະຫນາມກິລາ SV ໃຫ້ບໍລິການຈຸດປະສົງທີສອງຂອງການອະນຸຍາດໃຫ້ SVs ທີ່ຍັງມີຊີວິດຢູ່ຕັ້ງຢູ່ແລະ
ຖືກທໍາລາຍໃນລະຫວ່າງການທໍາຄວາມສະອາດຄັ້ງສຸດທ້າຍ.

ໃນລະດັບຕ່ໍາສຸດ, ມະຫາພາກ new_SV() ແລະ del_SV() ຈັບແລະປົດປ່ອຍຫົວ SV. (ຖ້າ
ການດີບັກດ້ວຍ -DD, del_SV() ເອີ້ນຟັງຊັນ S_del_sv() ເພື່ອສົ່ງຄືນ SV ເປັນຟຣີ
ບັນ​ຊີ​ລາຍ​ຊື່​ທີ່​ມີ​ການ​ກວດ​ສອບ​ຄວາມ​ຜິດ​ພາດ​.) new_SV() ໂທ more_sv() / sv_add_arena() ເພື່ອເພີ່ມສະຫນາມກິລາພິເສດ
ຖ້າບັນຊີລາຍຊື່ທີ່ບໍ່ເສຍຄ່າແມ່ນຫວ່າງເປົ່າ. SVs ໃນລາຍຊື່ຟຣີມີຊ່ອງຂໍ້ມູນ SvTYPE ຂອງເຂົາເຈົ້າຕັ້ງເປັນທຸກອັນ.

ໃນ​ເວ​ລາ​ທໍາ​ຄວາມ​ສະ​ອາດ​ສຸດ​ທ້າຍ​, sv_free_arenas() ຖືກເອີ້ນຈາກ perl_destruct() to
ບໍ່ເສຍຄ່າທາງຮ່າງກາຍທຸກສະຫນາມກິລາທີ່ຖືກຈັດສັນຕັ້ງແຕ່ການເລີ່ມຕົ້ນຂອງນາຍພາສາ.

ຟັງຊັນ ຢ້ຽມຢາມ() ສະແກນລາຍການ SV arenas, ແລະເອີ້ນຟັງຊັນທີ່ລະບຸໄວ້ສໍາລັບແຕ່ລະ SV
ມັນພົບວ່າອັນໃດທີ່ຍັງມີຊີວິດຢູ່ - ie ທີ່ມີ SvTYPE ນອກເໜືອໄປຈາກທັງໝົດ 1, ແລະບໍ່ມີສູນ.
SvREFCNT. ຢ້ຽມຢາມ() ຖືກນໍາໃຊ້ໂດຍຫນ້າທີ່ດັ່ງຕໍ່ໄປນີ້ (ລະບຸເປັນ [function ທີ່ໂທຫາ
ຢ້ຽມຢາມ()] / [ການທໍາງານເອີ້ນວ່າໂດຍ ຢ້ຽມຢາມ() ສໍາລັບແຕ່ລະ SV]):

sv_report_used() / do_report_used()
ຖິ້ມ SVs ທີ່ຍັງເຫຼືອທັງໝົດ (ການຊ່ວຍແກ້ບັນຫາ)

sv_clean_objs() / do_clean_objs(),do_clean_named_objs(),
do_clean_named_io_objs(),do_curse()
ພະຍາຍາມປົດປ່ອຍວັດຖຸທັງໝົດທີ່ຊີ້ໄປຫາ RVs,
ພະຍາຍາມເຮັດເຊັ່ນດຽວກັນສໍາລັບວັດຖຸທັງຫມົດ indir-
ອ້າງອີງ ectly ໂດຍ typeglobs ເກີນໄປ, ແລະ
ຫຼັງ ຈາກ ນັ້ນ ກວາດ ສຸດ ທ້າຍ, cursing ໃດ
ວັດຖຸທີ່ຍັງເຫຼືອ. ໂທຫາຄັ້ງດຽວຈາກ
perl_destruct(), ກ່ອນທີ່ຈະໂທຫາ sv_clean_all()
ຂ້າງລຸ່ມນີ້.

sv_clean_all() / do_clean_all()
SvREFCNT_dec(sv) ແຕ່ລະ SV ທີ່ຍັງເຫຼືອ, ເປັນໄປໄດ້
ກະຕຸ້ນ sv_free(). ມັນຍັງກໍານົດ
SVf_BREAK ທຸງໃນ SV ເພື່ອຊີ້ບອກວ່າ
refcnt ໄດ້ຖືກຫຼຸດລົງປອມ, ແລະດັ່ງນັ້ນ
ການຢຸດເຊົາ sv_free() ຈາກການໃຫ້ຄໍາເຕືອນທີ່ຂີ້ຮ້າຍ
ກ່ຽວກັບ SVs ທີ່ບໍ່ຄາດຄິດມີ refcnt
ຂອງສູນ. ເອີ້ນຊ້ຳໆຈາກ perl_destruct()
ຈົນກ່ວາບໍ່ມີ SVs ເຫຼືອ.

SvTHINKFIRST
ກວດເບິ່ງທຸງດ່ວນເພື່ອເບິ່ງວ່າ sv ຄວນຈະຖືກສົ່ງກັບ sv_force_normal ຫຼືບໍ່
"ຫຼຸດລົງ" ກ່ອນທີ່ຈະ SvIVX ຫຼື SvPVX ສາມາດແກ້ໄຂໄດ້ໂດຍກົງ.

ຕົວຢ່າງ, ຖ້າ scalar ຂອງທ່ານແມ່ນການອ້າງອິງແລະທ່ານຕ້ອງການດັດແປງຊ່ອງ SvIVX,
ທ່ານບໍ່ສາມາດພຽງແຕ່ເຮັດ SvROK_off, ຍ້ອນວ່າມັນຈະຮົ່ວໄຫລຂອງເອກະສານອ້າງອີງ.

ນີ້ຖືກນໍາໃຊ້ພາຍໃນໂດຍຟັງຊັນ sv-modifying ຕ່າງໆ, ເຊັ່ນ: sv_setsv,
sv_setiv ແລະ sv_pvn_force.

ກໍລະນີຫນຶ່ງທີ່ສິ່ງນີ້ບໍ່ໄດ້ຈັດການແມ່ນ gv ໂດຍບໍ່ມີຊຸດ SvFAKE. ຫຼັງຈາກ

ຖ້າ (SvTHINKFIRST(gv)) sv_force_normal(gv);

ມັນຈະຍັງຄົງເປັນ gv.

SvTHINKFIRST ບາງຄັ້ງຜະລິດຜົນບວກທີ່ບໍ່ຖືກຕ້ອງ. ໃນກໍລະນີເຫຼົ່ານັ້ນ sv_force_normal
ບໍ່ເຮັດຫຍັງ.

U32 SvTHINKFIRST(SV *sv)

sv_add_arena
ມອບຄວາມຊົງຈໍາອັນໜຶ່ງ, ເຊື່ອມຕໍ່ມັນກັບຫົວຂອງລາຍການສະໜາມ, ແລະແຍກມັນອອກ
ເຂົ້າໄປໃນບັນຊີລາຍຊື່ຂອງ SVs ຟຣີ.

void sv_add_arena(char *const ptr, const U32 size,
const ທຸງ U32)

sv_clean_all
ຫຼຸດລົງ refcnt ຂອງແຕ່ລະ SV ທີ່ຍັງເຫຼືອ, ອາດຈະເຮັດໃຫ້ເກີດການທໍາຄວາມສະອາດ. ນີ້
ຟັງຊັນອາດຈະຕ້ອງຖືກເອີ້ນຫຼາຍຄັ້ງເພື່ອໃຫ້ SVs ຟຣີທີ່ສັບສົນ
ລຳດັບການອ້າງອິງຕົນເອງ.

I32 sv_clean_all()

sv_clean_objs
ພະຍາຍາມທໍາລາຍສິ່ງຂອງທັງຫມົດຍັງບໍ່ທັນໄດ້ປົດປ່ອຍ.

void sv_clean_objs()

sv_free_arenas
ຈັດສັນໜ່ວຍຄວາມຈຳທີ່ໃຊ້ໂດຍທຸກສະໜາມ. ໃຫ້ສັງເກດວ່າຫົວ SV ສ່ວນບຸກຄົນທັງຫມົດ
ແລະອົງການຈັດຕັ້ງພາຍໃນສະຫນາມກິລາຕ້ອງໄດ້ຮັບການປົດປ່ອຍແລ້ວ.

void sv_free_arenas()

SV-Body ການຈັດສັນ

sv_2num ຫມາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງແລະອາດຈະມີການປ່ຽນແປງຫຼືຖືກໂຍກຍ້າຍອອກໂດຍບໍ່ມີການແຈ້ງການ.

ສົ່ງຄືນ SV ທີ່ມີຄ່າຕົວເລກຂອງແຫຼ່ງ SV, ດໍາເນີນການໃດໆທີ່ຈໍາເປັນ
ການ​ອ້າງ​ອີງ​ຫຼື overload conversion. ຄາດ​ວ່າ​ຜູ້​ໂທ​ຈະ​ໄດ້​ຮັບ​ມື.
magic ແລ້ວ.

SV* sv_2num(SV *const sv)

sv_copypv
ສຳເນົາຕົວແທນທີ່ເຂັ້ມງວດຂອງແຫຼ່ງ SV ເຂົ້າໄປໃນ SV ປາຍທາງ.
ອັດຕະໂນມັດປະຕິບັດ mg_get ທີ່ຈໍາເປັນແລະການບີບບັງຄັບຂອງຄ່າຕົວເລກເຂົ້າໄປໃນ
ສາຍ. ຮັບປະກັນທີ່ຈະຮັກສາທຸງ UTF8 ເຖິງແມ່ນວ່າຈາກວັດຖຸ overloaded. ຄ້າຍຄືກັນ
ໃນລັກສະນະເປັນ sv_2pv[_flags] ແຕ່ດໍາເນີນການໂດຍກົງໃນ SV ແທນທີ່ຈະເປັນພຽງແຕ່.
ສາຍ. ສ່ວນໃຫຍ່ໃຊ້ sv_2pv_flags ເພື່ອເຮັດວຽກຂອງມັນ, ຍົກເວັ້ນເວລາທີ່ມັນຈະສູນເສຍ
UTF-8'ness ຂອງ PV.

void sv_copypv(SV *const dsv, SV *const ssv)

sv_ref ກັບຄືນ SV ທີ່ອະທິບາຍສິ່ງທີ່ SV ຜ່ານເຂົ້າມາແມ່ນການອ້າງອີງ.

SV* sv_ref(SV *dst, const SV *const sv,
const int ob)

Unicode ສະຫນັບສະຫນູນ

find_uninit_var
ໝາຍເຫດ: ຟັງຊັນນີ້ແມ່ນທົດລອງ ແລະອາດຈະມີການປ່ຽນແປງ ຫຼືຖືກຖອດອອກໂດຍບໍ່ໄດ້ແຈ້ງໃຫ້ຮູ້ລ່ວງໜ້າ.

ຊອກຫາຊື່ຂອງຕົວແປທີ່ບໍ່ໄດ້ກໍານົດ (ຖ້າມີ) ທີ່ເຮັດໃຫ້ຜູ້ປະຕິບັດງານມີບັນຫາ
ການເຕືອນ "ການນໍາໃຊ້ມູນຄ່າທີ່ບໍ່ໄດ້ກໍານົດໄວ້". ຖ້າກົງກັນແມ່ນຖືກຕ້ອງ, ພຽງແຕ່ສົ່ງຊື່ຖ້າ
ຄ່າຂອງມັນກົງກັບ uninit_sv. ສະນັ້ນເວົ້າປະມານ, ຖ້າຜູ້ປະຕິບັດການ unary (ເຊັ່ນ:
OP_COS) ສ້າງຄໍາເຕືອນ, ຫຼັງຈາກນັ້ນປະຕິບັດຕາມລູກໂດຍກົງຂອງ op ອາດຈະໃຫ້ຜົນໄດ້ຮັບ
OP_PADSV ຫຼື OP_GV ທີ່ໃຫ້ຊື່ຂອງຕົວແປທີ່ບໍ່ໄດ້ກໍານົດ. ອີກດ້ານນຶ່ງ
ມື, ດ້ວຍ OP_ADD ມີສອງສາຂາທີ່ຈະປະຕິບັດຕາມ, ດັ່ງນັ້ນພວກເຮົາພຽງແຕ່ພິມຕົວແປ
ຊື່​ຖ້າ​ຫາກ​ວ່າ​ພວກ​ເຮົາ​ໄດ້​ຮັບ​ການ​ແຂ່ງ​ຂັນ​ທີ່​ແນ່​ນອນ​. desc_p ຊີ້ໄປຫາຕົວຊີ້ສະຕຣິງທີ່ຖື
ລາຍ​ລະ​ອຽດ​ຂອງ op. ນີ້ອາດຈະໄດ້ຮັບການປັບປຸງຖ້າຈໍາເປັນ.

ຊື່ຖືກສົ່ງຄືນເປັນ SV ຕາຍ.

ສົມມຸດວ່າ PL_op ແມ່ນ op ທີ່ເຮັດໃຫ້ເກີດຄວາມຜິດພາດໃນເບື້ອງຕົ້ນ, ແລະນັ້ນ
PL_comppad/PL_curpad ຊີ້ໄປທີ່ແຜ່ນທີ່ກຳລັງປະຕິບັດຢູ່.

SV* find_uninit_var(const OP *const obase,
const SV *const uninit_sv,
bool match, const char **desc_p)

report_uninit
ພິມຄໍາເຕືອນ "ການນໍາໃຊ້ຕົວແປທີ່ບໍ່ໄດ້ກໍານົດໄວ້" ທີ່ເຫມາະສົມ.

void report_uninit(const SV *uninit_sv)

ບໍ່ມີຫຼັກຖານຢັ້ງຢືນ ຫນ້າທີ່

ໜ້າທີ່ຕໍ່ໄປນີ້ແມ່ນບໍ່ມີເອກະສານ. ຖ້າທ່ານໃຊ້ຫນຶ່ງຂອງພວກເຂົາ, ທ່ານອາດຈະຕ້ອງການ
ພິຈາລະນາສ້າງແລະສົ່ງເອກະສານສໍາລັບມັນ.

PerlIO_restore_errno
PerlIO_save_errno
Slab_Alloc
Slab_Free
Slab_to_ro
Slab_to_rw
_add_range_to_invlist
_core_swash_init
_get_encoding
_get_swash_invlist
_invlist_array_init
_invlist_contains_cp
_invlist_contents
_invlist_dump
_invlist_intersection
_invlist_intersection_maybe_complement_2nd
_invlist_invert
_invlist_len
_invlist_populate_swatch
_invlist_search
_invlist_subtract
_invlist_union
_invlist_union_maybe_complement_2nd
_load_PL_utf8_foldcloses
_new_invlist
_setup_canned_invlist
_swash_inversion_hash
_swash_to_invlist
_to_fold_latin1
_to_upper_title_latin1
_warn_problematic_locale
aassign_common_vars
add_cp_to_invlist
alloc_maybe_populate_EXACT
ການຈັດສັນ
amagic_is_enabled
ນໍາໃຊ້
av_extend_guts
av_reify
bind_match
boot_core_PerlIO
boot_core_UNIVERSAL
boot_core_mro
ເມື່ອ​ໃດ​
check_utf8_print
ck_anoncode
ck_backtick
ck_bitop
ck_cmp
ck_concat
ck_ຖືກກໍານົດ
ck_delete
ck_ແຕ່ລະ
ck_entersub_args_core
ck_eof
ck_eval
ck_exec
ck_ ມີຢູ່
ck_ftst
ck_fun
ck_glob
ck_grep
ck_index
ck_join
ck_length
ck_lfun
ck_listiob
ck_match
ck_method
ck_null
ck_open
ck_prototype
ck_readline
ck_refassign
ck_repeat
ck_require
ck_return
ck_fun
ck_rvconst
ck_sassign
ck_select
ck_shift
ck_smartmatch
ck_sort
ck_spair
ck_split
ck_stringify
ck_subr
ck_substr
ck_svconst
ck_ບອກ
ck_trunc
ຕຳຫຼວດໃກ້ທີ່ສຸດ
compute_EXACTish
coresub_op
create_eval_scope
croak_no_mem
croak_popstack
current_re_engine
custom_op_get_field
cv_ckproto_len_flags
cv_clone_into
cv_const_sv_or_av
cv_undef_flags
cvgv_from_hek
cvgv_set
cvstash_set
deb_stack_all
defelem_target
delete_eval_scope
die_unwind
do_aexec
do_aexec5
do_eof
do_exec
do_exec3
do_execfree
do_ipcctl
do_ipcget
do_msgrcv
do_msgsnd
do_ncmp
do_open6
do_open_raw
do_print
do_readline
do_seek
do_semop
do_shmio
do_sysseek
do_ບອກ
do_trans
do_vecget
do_vecset
do_vop
dofile
drand48_init_r
drand48_r
dump_all_perl
dump_packsubs_perl
dump_sub_perl
dump_sv_child
emulate_cop_io
feature_is_enabled
find_lexical_cv
ຊອກຫາ_runcv_where
find_rundefsv2
find_script
free_tied_hv_pool
get_and_check_backslash_N_name
get_db_sub
get_debug_opts
get_hash_seed
get_invlist_iter_addr
get_invlist_offset_addr
get_invlist_previous_index_addr
get_no_modify
get_opargs
get_re_arg
getenv_len
grok_atoUV
grok_bslash_x
gv_fetchmeth_ພາຍໃນ
gv_override
gv_setref
gv_stashpvn_ພາຍໃນ
gv_stashsvpvn_cached
hfree_next_entry
hv_backreferences_p
hv_kill_backrefs
hv_placeholders_p
hv_undef_flags
init_argv_symbols
init_constants
init_dbargs
init_debugger
ປີ້ນ
invlist_array
invlist_clone
invlist_highest
invlist_is_iterating
invlist_iterfinish
invlist_iterinit
invlist_max
invlist_previous_index
invlist_set_len
invlist_set_previous_index
invlist_trim
io_close
is_utf8_common
isinfnansv
jmabe
ຄໍາ
keyword_plugin_standard
ບັນຊີລາຍຊື່
ທ້ອງຖິ່ນ
magic_clear_all_env
magic_cleararylen_p
magic_clearenv
magic_clearisa
magic_clearpack
magic_clearig
magic_copycallchecker
magic_existspack
magic_freearylen_p
magic_freeovrld
magic_get
magic_getarylen
magic_getdebugvar
magic_getdefelem
magic_getnkeys
magic_getpack
magic_getpos
magic_getsig
magic_getsubstr
magic_gettaint
magic_getuvar
magic_getvec
magic_killbackrefs
magic_nextpack
magic_regdata_cnt
magic_regdatum_get
magic_regdatum_set
magic_scalarpack
magic_set
magic_set_all_env
magic_setarylen
magic_setcolxfrm
magic_setdbline
magic_setdebugvar
magic_setdefelem
magic_setenv
magic_setisa
magic_setlvref
magic_setmglob
magic_setnkeys
magic_setpack
magic_setpos
magic_setregexp
magic_setsig
magic_setsubstr
magic_settaint
magic_setutf8
magic_setuvar
magic_setvec
magic_sizepack
magic_wipepack
malloc_good_size
malloced_size
mem_colxfrm
mg_find_mglob
mode_from_discipline
more_bodies
mro_meta_dup
mro_meta_init
multideref_stringify
my_attrs
my_clearenv
my_lstat_flags
my_stat_flags
my_unexec
ໃໝ່ATTRSUB_x
GP ໃຫມ່
newMETHOP_internal
newSTUB
ໃຫມ່SVavdefelem
newXS_deffile
newXS_len_flags
new_warnings_bitfield
Nextargv
noperl_die
oopsAV
oopsHV
op_clear
op_integerize
op_lvalue_flags
op_refcnt_dec
op_refcnt_inc
op_relocate_sv
op_std_init
op_unscope
opmethod_stash
opslab_force_free
opslab_free
opslab_free_nopad
ຊຸດ
package_version
pad_add_weakref
padlist_store
padname_free
padnamelist_free
parse_subsignature
parse_unicode_opts
parser_free
parser_free_nexttoke_ops
path_is_searchable
peep
ເວລາກາງຄືນ
populate_isa
ptr_hash
ຂໍ້ຜິດພາດ
re_op_compile
reg_named_buff
reg_named_buff_iter
reg_numbered_buff_fetch
reg_numbered_buff_length
reg_numbered_buff_store
reg_qr_package
reg_skipcomment
reg_temp_copy
ເປັນປົກກະຕິ
regpposixcc
regprop
report_evil_fh
report_redefined_cv
report_wrongway_fh
ປີບ
rsignal_restore
rsignal_save
rxres_save
same_dirent
save_aliased_sv
save_strlen
ເລື່ອຍ
ຜິວ ໜັງ
scalarvoid
set_caret_X
set_padlist
ຄວນ_warn_nl
ຜູ້ຮັບມື
softref2xv
ssc_add_range
ssc_clear_locale
ssc_cp_ ແລະ
ssc_intersection
ssc_union
sub_crush_depth
sv_add_backref
sv_buf_to_ro
sv_del_backref
sv_free2
sv_kill_backrefs
sv_len_utf8_nomg
sv_magicext_mglob
sv_mortalcopy_flags
sv_only_taint_gmagic
sv_or_pv_pos_u2b
sv_resetpvn
sv_sethek
sv_setsv_cow
sv_unglob
tied_method
tmps_grow_p
translate_substr_offsets
try_amagic_bin
try_amagic_un
unshare_hek
ນຳ ໃຊ້
varname
vivify_defelem
vivify_ref
wait4pid
was_lvalue_sub
ສັງເກດເບິ່ງ
win32_croak_not_implemented
write_to_stderr
xs_boot_epilog
xs_handshake
yyerror
yyerror_pv
yyerror_pvn
yylex
yyparse
yyunlex

AUTHORS

ລະບົບເອກະສານອັດຕະໂນມັດໄດ້ຖືກເພີ່ມເຂົ້າໃນຫຼັກ Perl ໂດຍ Benjamin Stuhl.
ເອກະສານແມ່ນໂດຍໃຜທີ່ມີໃຈດີພຽງພໍທີ່ຈະບັນທຶກຫນ້າທີ່ຂອງເຂົາເຈົ້າ.

ໃຊ້ perlintern ອອນໄລນ໌ໂດຍໃຊ້ບໍລິການ onworks.net