It seems crazy for Perl_yylex() to individually shift each element off
[p5sagit/p5-mst-13.2.git] / pod / perlintern.pod
CommitLineData
3f98fbb3 1-*- buffer-read-only: t -*-
2
3!!!!!!! DO NOT EDIT THIS FILE !!!!!!!
4This file is built by autodoc.pl extracting documentation from the C source
5files.
6
954c1994 7=head1 NAME
8
1c846c1f 9perlintern - autogenerated documentation of purely B<internal>
954c1994 10 Perl functions
11
12=head1 DESCRIPTION
d8c40edc 13X<internal Perl functions> X<interpreter functions>
954c1994 14
1c846c1f 15This file is the autogenerated documentation of functions in the
4375e838 16Perl interpreter that are documented using Perl's internal documentation
1c846c1f 17format but are not marked as part of the Perl API. In other words,
954c1994 18B<they are not for use in extensions>!
19
a8586c98 20
7dafbf52 21=head1 CV reference counts and CvOUTSIDE
22
23=over 8
24
25=item CvWEAKOUTSIDE
d8c40edc 26X<CvWEAKOUTSIDE>
7dafbf52 27
28Each CV has a pointer, C<CvOUTSIDE()>, to its lexically enclosing
29CV (if any). Because pointers to anonymous sub prototypes are
30stored in C<&> pad slots, it is a possible to get a circular reference,
31with the parent pointing to the child and vice-versa. To avoid the
32ensuing memory leak, we do not increment the reference count of the CV
33pointed to by C<CvOUTSIDE> in the I<one specific instance> that the parent
34has a C<&> pad slot pointing back to us. In this case, we set the
35C<CvWEAKOUTSIDE> flag in the child. This allows us to determine under what
36circumstances we should decrement the refcount of the parent when freeing
37the child.
38
28a5cf3b 39There is a further complication with non-closure anonymous subs (i.e. those
7dafbf52 40that do not refer to any lexicals outside that sub). In this case, the
41anonymous prototype is shared rather than being cloned. This has the
42consequence that the parent may be freed while there are still active
43children, eg
44
45 BEGIN { $a = sub { eval '$x' } }
46
47In this case, the BEGIN is freed immediately after execution since there
48are no active references to it: the anon sub prototype has
49C<CvWEAKOUTSIDE> set since it's not a closure, and $a points to the same
50CV, so it doesn't contribute to BEGIN's refcount either. When $a is
51executed, the C<eval '$x'> causes the chain of C<CvOUTSIDE>s to be followed,
52and the freed BEGIN is accessed.
53
54To avoid this, whenever a CV and its associated pad is freed, any
55C<&> entries in the pad are explicitly removed from the pad, and if the
56refcount of the pointed-to anon sub is still positive, then that
57child's C<CvOUTSIDE> is set to point to its grandparent. This will only
58occur in the single specific case of a non-closure anon prototype
59having one or more active references (such as C<$a> above).
60
61One other thing to consider is that a CV may be merely undefined
62rather than freed, eg C<undef &foo>. In this case, its refcount may
63not have reached zero, but we still delete its pad and its C<CvROOT> etc.
64Since various children may still have their C<CvOUTSIDE> pointing at this
65undefined CV, we keep its own C<CvOUTSIDE> for the time being, so that
66the chain of lexical scopes is unbroken. For example, the following
67should print 123:
68
69 my $x = 123;
70 sub tmp { sub { eval '$x' } }
71 my $a = tmp();
72 undef &tmp;
73 print $a->();
74
75 bool CvWEAKOUTSIDE(CV *cv)
76
77=for hackers
78Found in file cv.h
79
80
81=back
82
dd2155a4 83=head1 Functions in file pad.h
84
85
86=over 8
87
88=item CX_CURPAD_SAVE
d8c40edc 89X<CX_CURPAD_SAVE>
dd2155a4 90
91Save the current pad in the given context block structure.
92
93 void CX_CURPAD_SAVE(struct context)
94
95=for hackers
96Found in file pad.h
97
98=item CX_CURPAD_SV
d8c40edc 99X<CX_CURPAD_SV>
dd2155a4 100
101Access the SV at offset po in the saved current pad in the given
102context block structure (can be used as an lvalue).
103
f3548bdc 104 SV * CX_CURPAD_SV(struct context, PADOFFSET po)
dd2155a4 105
106=for hackers
107Found in file pad.h
108
d8c40edc 109=item PAD_BASE_SV
110X<PAD_BASE_SV>
dd2155a4 111
112Get the value from slot C<po> in the base (DEPTH=1) pad of a padlist
113
d8c40edc 114 SV * PAD_BASE_SV(PADLIST padlist, PADOFFSET po)
dd2155a4 115
116=for hackers
117Found in file pad.h
118
119=item PAD_CLONE_VARS
d8c40edc 120X<PAD_CLONE_VARS>
dd2155a4 121
122|CLONE_PARAMS* param
123Clone the state variables associated with running and compiling pads.
124
125 void PAD_CLONE_VARS(PerlInterpreter *proto_perl \)
126
127=for hackers
128Found in file pad.h
129
130=item PAD_COMPNAME_FLAGS
d8c40edc 131X<PAD_COMPNAME_FLAGS>
dd2155a4 132
133Return the flags for the current compiling pad name
134at offset C<po>. Assumes a valid slot entry.
135
136 U32 PAD_COMPNAME_FLAGS(PADOFFSET po)
137
138=for hackers
139Found in file pad.h
140
141=item PAD_COMPNAME_GEN
d8c40edc 142X<PAD_COMPNAME_GEN>
dd2155a4 143
144The generation number of the name at offset C<po> in the current
00a0d662 145compiling pad (lvalue). Note that C<SvUVX> is hijacked for this purpose.
dd2155a4 146
147 STRLEN PAD_COMPNAME_GEN(PADOFFSET po)
148
149=for hackers
150Found in file pad.h
151
27da23d5 152=item PAD_COMPNAME_GEN_set
d8c40edc 153X<PAD_COMPNAME_GEN_set>
27da23d5 154
155Sets the generation number of the name at offset C<po> in the current
00a0d662 156ling pad (lvalue) to C<gen>. Note that C<SvUV_set> is hijacked for this purpose.
27da23d5 157
158 STRLEN PAD_COMPNAME_GEN_set(PADOFFSET po, int gen)
159
160=for hackers
161Found in file pad.h
162
dd2155a4 163=item PAD_COMPNAME_OURSTASH
d8c40edc 164X<PAD_COMPNAME_OURSTASH>
dd2155a4 165
166Return the stash associated with an C<our> variable.
167Assumes the slot entry is a valid C<our> lexical.
168
169 HV * PAD_COMPNAME_OURSTASH(PADOFFSET po)
170
171=for hackers
172Found in file pad.h
173
174=item PAD_COMPNAME_PV
d8c40edc 175X<PAD_COMPNAME_PV>
dd2155a4 176
177Return the name of the current compiling pad name
178at offset C<po>. Assumes a valid slot entry.
179
180 char * PAD_COMPNAME_PV(PADOFFSET po)
181
182=for hackers
183Found in file pad.h
184
185=item PAD_COMPNAME_TYPE
d8c40edc 186X<PAD_COMPNAME_TYPE>
dd2155a4 187
188Return the type (stash) of the current compiling pad name at offset
189C<po>. Must be a valid name. Returns null if not typed.
190
191 HV * PAD_COMPNAME_TYPE(PADOFFSET po)
192
193=for hackers
194Found in file pad.h
195
196=item PAD_DUP
d8c40edc 197X<PAD_DUP>
dd2155a4 198
199Clone a padlist.
200
201 void PAD_DUP(PADLIST dstpad, PADLIST srcpad, CLONE_PARAMS* param)
202
203=for hackers
204Found in file pad.h
205
f3548bdc 206=item PAD_RESTORE_LOCAL
d8c40edc 207X<PAD_RESTORE_LOCAL>
f3548bdc 208
209Restore the old pad saved into the local variable opad by PAD_SAVE_LOCAL()
210
211 void PAD_RESTORE_LOCAL(PAD *opad)
212
213=for hackers
214Found in file pad.h
215
216=item PAD_SAVE_LOCAL
d8c40edc 217X<PAD_SAVE_LOCAL>
f3548bdc 218
219Save the current pad to the local variable opad, then make the
220current pad equal to npad
221
222 void PAD_SAVE_LOCAL(PAD *opad, PAD *npad)
223
224=for hackers
225Found in file pad.h
226
dd2155a4 227=item PAD_SAVE_SETNULLPAD
d8c40edc 228X<PAD_SAVE_SETNULLPAD>
dd2155a4 229
230Save the current pad then set it to null.
231
232 void PAD_SAVE_SETNULLPAD()
233
234=for hackers
235Found in file pad.h
236
d8c40edc 237=item PAD_SETSV
238X<PAD_SETSV>
dd2155a4 239
240Set the slot at offset C<po> in the current pad to C<sv>
241
d8c40edc 242 SV * PAD_SETSV(PADOFFSET po, SV* sv)
dd2155a4 243
244=for hackers
245Found in file pad.h
246
d8c40edc 247=item PAD_SET_CUR
248X<PAD_SET_CUR>
dd2155a4 249
250Set the current pad to be pad C<n> in the padlist, saving
f54ba1c2 251the previous current pad. NB currently this macro expands to a string too
252long for some compilers, so it's best to replace it with
253
254 SAVECOMPPAD();
255 PAD_SET_CUR_NOSAVE(padlist,n);
256
dd2155a4 257
d8c40edc 258 void PAD_SET_CUR(PADLIST padlist, I32 n)
dd2155a4 259
260=for hackers
261Found in file pad.h
262
d8c40edc 263=item PAD_SET_CUR_NOSAVE
264X<PAD_SET_CUR_NOSAVE>
bf9cdc68 265
266like PAD_SET_CUR, but without the save
267
d8c40edc 268 void PAD_SET_CUR_NOSAVE(PADLIST padlist, I32 n)
bf9cdc68 269
270=for hackers
271Found in file pad.h
272
d8c40edc 273=item PAD_SV
274X<PAD_SV>
dd2155a4 275
276Get the value at offset C<po> in the current pad
277
d8c40edc 278 void PAD_SV(PADOFFSET po)
dd2155a4 279
280=for hackers
281Found in file pad.h
282
d8c40edc 283=item PAD_SVl
284X<PAD_SVl>
dd2155a4 285
286Lightweight and lvalue version of C<PAD_SV>.
287Get or set the value at offset C<po> in the current pad.
288Unlike C<PAD_SV>, does not print diagnostics with -DX.
289For internal use only.
290
d8c40edc 291 SV * PAD_SVl(PADOFFSET po)
dd2155a4 292
293=for hackers
294Found in file pad.h
295
d8c40edc 296=item SAVECLEARSV
297X<SAVECLEARSV>
dd2155a4 298
28a5cf3b 299Clear the pointed to pad value on scope exit. (i.e. the runtime action of 'my')
dd2155a4 300
d8c40edc 301 void SAVECLEARSV(SV **svp)
dd2155a4 302
303=for hackers
304Found in file pad.h
305
306=item SAVECOMPPAD
d8c40edc 307X<SAVECOMPPAD>
dd2155a4 308
309save PL_comppad and PL_curpad
310
dd2155a4 311
dd2155a4 312
313
314
f3548bdc 315 void SAVECOMPPAD()
dd2155a4 316
317=for hackers
318Found in file pad.h
319
d8c40edc 320=item SAVEPADSV
321X<SAVEPADSV>
dd2155a4 322
323Save a pad slot (used to restore after an iteration)
324
f3548bdc 325XXX DAPM it would make more sense to make the arg a PADOFFSET
d8c40edc 326 void SAVEPADSV(PADOFFSET po)
dd2155a4 327
328=for hackers
329Found in file pad.h
330
331
332=back
333
a4f1a029 334=head1 GV Functions
335
336=over 8
337
338=item is_gv_magical
d8c40edc 339X<is_gv_magical>
a4f1a029 340
341Returns C<TRUE> if given the name of a magical GV.
342
343Currently only useful internally when determining if a GV should be
344created even in rvalue contexts.
345
346C<flags> is not used at present but available for future extension to
347allow selecting particular classes of magical variable.
348
766f8916 349Currently assumes that C<name> is NUL terminated (as well as len being valid).
350This assumption is met by all callers within the perl core, which all pass
351pointers returned by SvPV.
352
7fc63493 353 bool is_gv_magical(const char *name, STRLEN len, U32 flags)
354
355=for hackers
356Found in file gv.c
357
358=item is_gv_magical_sv
d8c40edc 359X<is_gv_magical_sv>
7fc63493 360
361Returns C<TRUE> if given the name of a magical GV. Calls is_gv_magical.
362
363 bool is_gv_magical_sv(SV *name, U32 flags)
645c22ef 364
365=for hackers
a4f1a029 366Found in file gv.c
367
368
369=back
370
b3ca2e83 371=head1 Hash Manipulation Functions
372
373=over 8
374
bd95ae50 375=item refcounted_he_chain_2hv
376X<refcounted_he_chain_2hv>
377
8a0be661 378Generates and returns a C<HV *> by walking up the tree starting at the passed
bd95ae50 379in C<struct refcounted_he *>.
380
381 HV * refcounted_he_chain_2hv(const struct refcounted_he *c)
382
383=for hackers
384Found in file hv.c
385
b3ca2e83 386=item refcounted_he_free
387X<refcounted_he_free>
388
389Decrements the reference count of the passed in C<struct refcounted_he *>
390by one. If the reference count reaches zero the structure's memory is freed,
391and C<refcounted_he_free> iterates onto the parent node.
392
393 void refcounted_he_free(struct refcounted_he *he)
394
395=for hackers
396Found in file hv.c
397
398=item refcounted_he_new
399X<refcounted_he_new>
400
ec2a1de7 401Creates a new C<struct refcounted_he>. As S<key> is copied, and value is
402stored in a compact form, all references remain the property of the caller.
403The C<struct refcounted_he> is returned with a reference count of 1.
b3ca2e83 404
b46c265e 405 struct refcounted_he * refcounted_he_new(struct refcounted_he *const parent, SV *const key, SV *const value)
b3ca2e83 406
407=for hackers
408Found in file hv.c
409
410
411=back
412
a4f1a029 413=head1 IO Functions
414
415=over 8
645c22ef 416
a8586c98 417=item start_glob
d8c40edc 418X<start_glob>
a8586c98 419
420Function called by C<do_readline> to spawn a glob (or do the glob inside
421perl on VMS). This code used to be inline, but now perl uses C<File::Glob>
bd16a5f0 422this glob starter is only used by miniperl during the build process.
a8586c98 423Moving it away shrinks pp_hot.c; shrinking pp_hot.c helps speed perl up.
424
425 PerlIO* start_glob(SV* pattern, IO *io)
426
427=for hackers
428Found in file doio.c
429
a4f1a029 430
431=back
432
0cbee0a4 433=head1 Magical Functions
434
435=over 8
436
b3ca2e83 437=item magic_sethint
438X<magic_sethint>
439
c28fe1ec 440Triggered by a delete from %^H, records the key to
441C<PL_compiling.cop_hints_hash>.
b3ca2e83 442
443 int magic_sethint(SV* sv, MAGIC* mg)
444
445=for hackers
446Found in file mg.c
447
0cbee0a4 448=item mg_localize
d8c40edc 449X<mg_localize>
0cbee0a4 450
451Copy some of the magic from an existing SV to new localized version of
452that SV. Container magic (eg %ENV, $1, tie) gets copied, value magic
453doesn't (eg taint, pos).
454
455 void mg_localize(SV* sv, SV* nsv)
456
457=for hackers
458Found in file mg.c
459
460
461=back
462
47c9dd14 463=head1 MRO Functions
464
465=over 8
466
c74c7a1e 467=item mro_get_linear_isa_c3
468X<mro_get_linear_isa_c3>
469
470Returns the C3 linearization of @ISA
471the given stash. The return value is a read-only AV*.
472C<level> should be 0 (it is used internally in this
473function's recursion).
474
475You are responsible for C<SvREFCNT_inc()> on the
476return value if you plan to store it anywhere
477semi-permanently (otherwise it might be deleted
478out from under you the next time the cache is
479invalidated).
480
481 AV* mro_get_linear_isa_c3(HV* stash, I32 level)
482
483=for hackers
484Found in file mro.c
485
486=item mro_get_linear_isa_dfs
487X<mro_get_linear_isa_dfs>
488
489Returns the Depth-First Search linearization of @ISA
490the given stash. The return value is a read-only AV*.
491C<level> should be 0 (it is used internally in this
492function's recursion).
493
494You are responsible for C<SvREFCNT_inc()> on the
495return value if you plan to store it anywhere
496semi-permanently (otherwise it might be deleted
497out from under you the next time the cache is
498invalidated).
499
500 AV* mro_get_linear_isa_dfs(HV* stash, I32 level)
501
502=for hackers
503Found in file mro.c
504
47c9dd14 505=item mro_isa_changed_in
506X<mro_isa_changed_in>
507
508Takes the necessary steps (cache invalidations, mostly)
509when the @ISA of the given package has changed. Invoked
510by the C<setisa> magic, should not need to invoke directly.
511
512 void mro_isa_changed_in(HV* stash)
513
514=for hackers
515Found in file mro.c
516
517
518=back
519
a4f1a029 520=head1 Pad Data Structures
521
522=over 8
523
524=item CvPADLIST
d8c40edc 525X<CvPADLIST>
a4f1a029 526
527CV's can have CvPADLIST(cv) set to point to an AV.
528
529For these purposes "forms" are a kind-of CV, eval""s are too (except they're
530not callable at will and are always thrown away after the eval"" is done
b5c19bd7 531executing). Require'd files are simply evals without any outer lexical
532scope.
a4f1a029 533
534XSUBs don't have CvPADLIST set - dXSTARG fetches values from PL_curpad,
535but that is really the callers pad (a slot of which is allocated by
536every entersub).
537
538The CvPADLIST AV has does not have AvREAL set, so REFCNT of component items
f3548bdc 539is managed "manual" (mostly in pad.c) rather than normal av.c rules.
a4f1a029 540The items in the AV are not SVs as for a normal AV, but other AVs:
541
5420'th Entry of the CvPADLIST is an AV which represents the "names" or rather
543the "static type information" for lexicals.
544
545The CvDEPTH'th entry of CvPADLIST AV is an AV which is the stack frame at that
546depth of recursion into the CV.
547The 0'th slot of a frame AV is an AV which is @_.
548other entries are storage for variables and op targets.
549
550During compilation:
a6d05634 551C<PL_comppad_name> is set to the names AV.
552C<PL_comppad> is set to the frame AV for the frame CvDEPTH == 1.
553C<PL_curpad> is set to the body of the frame AV (i.e. AvARRAY(PL_comppad)).
a4f1a029 554
f3548bdc 555During execution, C<PL_comppad> and C<PL_curpad> refer to the live
556frame of the currently executing sub.
557
558Iterating over the names AV iterates over all possible pad
a4f1a029 559items. Pad slots that are SVs_PADTMP (targets/GVs/constants) end up having
560&PL_sv_undef "names" (see pad_alloc()).
561
562Only my/our variable (SVs_PADMY/SVs_PADOUR) slots get valid names.
563The rest are op targets/GVs/constants which are statically allocated
564or resolved at compile time. These don't have names by which they
565can be looked up from Perl code at run time through eval"" like
566my/our variables can be. Since they can't be looked up by "name"
567but only by their index allocated at compile time (which is usually
568in PL_op->op_targ), wasting a name SV for them doesn't make sense.
569
570The SVs in the names AV have their PV being the name of the variable.
00a0d662 571xlow+1..xhigh inclusive in the NV union is a range of cop_seq numbers for
572which the name is valid. For typed lexicals name SV is SVt_PVMG and SvSTASH
573points at the type. For C<our> lexicals, the type is also SVt_PVMG, with the
44a2ac75 574SvOURSTASH slot pointing at the stash of the associated global (so that
00a0d662 575duplicate C<our> declarations in the same package can be detected). SvUVX is
576sometimes hijacked to store the generation number during compilation.
a4f1a029 577
b5c19bd7 578If SvFAKE is set on the name SV, then that slot in the frame AV is
579a REFCNT'ed reference to a lexical from "outside". In this case,
00a0d662 580the name SV does not use xlow and xhigh to store a cop_seq range, since it is
581in scope throughout. Instead xhigh stores some flags containing info about
b5c19bd7 582the real lexical (is it declared in an anon, and is it capable of being
00a0d662 583instantiated multiple times?), and for fake ANONs, xlow contains the index
b5c19bd7 584within the parent's pad where the lexical's value is stored, to make
585cloning quicker.
a4f1a029 586
a6d05634 587If the 'name' is '&' the corresponding entry in frame AV
a4f1a029 588is a CV representing a possible closure.
589(SvFAKE and name of '&' is not a meaningful combination currently but could
590become so if C<my sub foo {}> is implemented.)
591
5c3943b6 592Note that formats are treated as anon subs, and are cloned each time
593write is called (if necessary).
594
2814eb74 595The flag SVf_PADSTALE is cleared on lexicals each time the my() is executed,
596and set on scope exit. This allows the 'Variable $x is not available' warning
597to be generated in evals, such as
598
599 { my $x = 1; sub f { eval '$x'} } f();
600
a4f1a029 601 AV * CvPADLIST(CV *cv)
602
603=for hackers
dd2155a4 604Found in file pad.c
605
606=item cv_clone
d8c40edc 607X<cv_clone>
dd2155a4 608
609Clone a CV: make a new CV which points to the same code etc, but which
ad63d80f 610has a newly-created pad built by copying the prototype pad and capturing
dd2155a4 611any outer lexicals.
612
613 CV* cv_clone(CV* proto)
614
615=for hackers
616Found in file pad.c
617
618=item cv_dump
d8c40edc 619X<cv_dump>
dd2155a4 620
621dump the contents of a CV
622
e1ec3a88 623 void cv_dump(const CV *cv, const char *title)
dd2155a4 624
625=for hackers
626Found in file pad.c
627
628=item do_dump_pad
d8c40edc 629X<do_dump_pad>
dd2155a4 630
631Dump the contents of a padlist
632
633 void do_dump_pad(I32 level, PerlIO *file, PADLIST *padlist, int full)
634
635=for hackers
636Found in file pad.c
637
638=item intro_my
d8c40edc 639X<intro_my>
dd2155a4 640
641"Introduce" my variables to visible status.
642
643 U32 intro_my()
644
645=for hackers
646Found in file pad.c
647
648=item pad_add_anon
d8c40edc 649X<pad_add_anon>
dd2155a4 650
651Add an anon code entry to the current compiling pad
652
653 PADOFFSET pad_add_anon(SV* sv, OPCODE op_type)
654
655=for hackers
656Found in file pad.c
657
658=item pad_add_name
d8c40edc 659X<pad_add_name>
dd2155a4 660
b5c19bd7 661Create a new name and associated PADMY SV in the current pad; return the
662offset.
dd2155a4 663If C<typestash> is valid, the name is for a typed lexical; set the
664name's stash to that value.
665If C<ourstash> is valid, it's an our lexical, set the name's
44a2ac75 666SvOURSTASH to that value
dd2155a4 667
dd2155a4 668If fake, it means we're cloning an existing entry
669
952306ac 670 PADOFFSET pad_add_name(const char *name, HV* typestash, HV* ourstash, bool clone, bool state)
dd2155a4 671
672=for hackers
673Found in file pad.c
674
675=item pad_alloc
d8c40edc 676X<pad_alloc>
dd2155a4 677
678Allocate a new my or tmp pad entry. For a my, simply push a null SV onto
679the end of PL_comppad, but for a tmp, scan the pad from PL_padix upwards
324092c6 680for a slot which has no name and no active value.
dd2155a4 681
682 PADOFFSET pad_alloc(I32 optype, U32 tmptype)
683
684=for hackers
685Found in file pad.c
686
687=item pad_block_start
d8c40edc 688X<pad_block_start>
dd2155a4 689
690Update the pad compilation state variables on entry to a new block
691
692 void pad_block_start(int full)
693
694=for hackers
695Found in file pad.c
696
697=item pad_check_dup
d8c40edc 698X<pad_check_dup>
dd2155a4 699
700Check for duplicate declarations: report any of:
701 * a my in the current scope with the same name;
702 * an our (anywhere in the pad) with the same name and the same stash
703 as C<ourstash>
704C<is_our> indicates that the name to check is an 'our' declaration
705
e1ec3a88 706 void pad_check_dup(const char* name, bool is_our, const HV* ourstash)
dd2155a4 707
708=for hackers
709Found in file pad.c
710
711=item pad_findlex
d8c40edc 712X<pad_findlex>
dd2155a4 713
714Find a named lexical anywhere in a chain of nested pads. Add fake entries
b5c19bd7 715in the inner pads if it's found in an outer one.
716
717Returns the offset in the bottom pad of the lex or the fake lex.
718cv is the CV in which to start the search, and seq is the current cop_seq
719to match against. If warn is true, print appropriate warnings. The out_*
720vars return values, and so are pointers to where the returned values
721should be stored. out_capture, if non-null, requests that the innermost
722instance of the lexical is captured; out_name_sv is set to the innermost
723matched namesv or fake namesv; out_flags returns the flags normally
724associated with the IVX field of a fake namesv.
725
726Note that pad_findlex() is recursive; it recurses up the chain of CVs,
727then comes back down, adding fake entries as it goes. It has to be this way
00a0d662 728because fake namesvs in anon protoypes have to store in xlow the index into
b5c19bd7 729the parent pad.
730
e1ec3a88 731 PADOFFSET pad_findlex(const char *name, const CV* cv, U32 seq, int warn, SV** out_capture, SV** out_name_sv, int *out_flags)
dd2155a4 732
733=for hackers
734Found in file pad.c
735
736=item pad_findmy
d8c40edc 737X<pad_findmy>
dd2155a4 738
ad63d80f 739Given a lexical name, try to find its offset, first in the current pad,
dd2155a4 740or failing that, in the pads of any lexically enclosing subs (including
ad63d80f 741the complications introduced by eval). If the name is found in an outer pad,
742then a fake entry is added to the current pad.
dd2155a4 743Returns the offset in the current pad, or NOT_IN_PAD on failure.
744
e1ec3a88 745 PADOFFSET pad_findmy(const char* name)
dd2155a4 746
747=for hackers
748Found in file pad.c
749
750=item pad_fixup_inner_anons
d8c40edc 751X<pad_fixup_inner_anons>
dd2155a4 752
753For any anon CVs in the pad, change CvOUTSIDE of that CV from
7dafbf52 754old_cv to new_cv if necessary. Needed when a newly-compiled CV has to be
755moved to a pre-existing CV struct.
dd2155a4 756
757 void pad_fixup_inner_anons(PADLIST *padlist, CV *old_cv, CV *new_cv)
758
759=for hackers
760Found in file pad.c
761
762=item pad_free
d8c40edc 763X<pad_free>
dd2155a4 764
d7f8936a 765Free the SV at offset po in the current pad.
dd2155a4 766
767 void pad_free(PADOFFSET po)
768
769=for hackers
770Found in file pad.c
771
772=item pad_leavemy
d8c40edc 773X<pad_leavemy>
dd2155a4 774
775Cleanup at end of scope during compilation: set the max seq number for
776lexicals in this scope and warn of any lexicals that never got introduced.
777
778 void pad_leavemy()
779
780=for hackers
781Found in file pad.c
782
783=item pad_new
d8c40edc 784X<pad_new>
dd2155a4 785
ad63d80f 786Create a new compiling padlist, saving and updating the various global
dd2155a4 787vars at the same time as creating the pad itself. The following flags
788can be OR'ed together:
789
790 padnew_CLONE this pad is for a cloned CV
791 padnew_SAVE save old globals
792 padnew_SAVESUB also save extra stuff for start of sub
793
c7c737cb 794 PADLIST* pad_new(int flags)
dd2155a4 795
796=for hackers
797Found in file pad.c
798
799=item pad_push
d8c40edc 800X<pad_push>
dd2155a4 801
802Push a new pad frame onto the padlist, unless there's already a pad at
26019298 803this depth, in which case don't bother creating a new one. Then give
804the new pad an @_ in slot zero.
dd2155a4 805
26019298 806 void pad_push(PADLIST *padlist, int depth)
dd2155a4 807
808=for hackers
809Found in file pad.c
810
811=item pad_reset
d8c40edc 812X<pad_reset>
dd2155a4 813
814Mark all the current temporaries for reuse
815
816 void pad_reset()
817
818=for hackers
819Found in file pad.c
820
821=item pad_setsv
d8c40edc 822X<pad_setsv>
dd2155a4 823
824Set the entry at offset po in the current pad to sv.
825Use the macro PAD_SETSV() rather than calling this function directly.
826
827 void pad_setsv(PADOFFSET po, SV* sv)
828
829=for hackers
830Found in file pad.c
831
832=item pad_swipe
d8c40edc 833X<pad_swipe>
dd2155a4 834
835Abandon the tmp in the current pad at offset po and replace with a
836new one.
837
838 void pad_swipe(PADOFFSET po, bool refadjust)
839
840=for hackers
841Found in file pad.c
842
843=item pad_tidy
d8c40edc 844X<pad_tidy>
dd2155a4 845
846Tidy up a pad after we've finished compiling it:
847 * remove most stuff from the pads of anonsub prototypes;
848 * give it a @_;
849 * mark tmps as such.
850
851 void pad_tidy(padtidy_type type)
852
853=for hackers
854Found in file pad.c
855
856=item pad_undef
d8c40edc 857X<pad_undef>
dd2155a4 858
859Free the padlist associated with a CV.
860If parts of it happen to be current, we null the relevant
861PL_*pad* global vars so that we don't have any dangling references left.
862We also repoint the CvOUTSIDE of any about-to-be-orphaned
a3985cdc 863inner subs to the outer of this cv.
dd2155a4 864
7dafbf52 865(This function should really be called pad_free, but the name was already
866taken)
867
a3985cdc 868 void pad_undef(CV* cv)
dd2155a4 869
870=for hackers
871Found in file pad.c
a4f1a029 872
873
874=back
875
907b3e23 876=head1 Per-Interpreter Variables
877
878=over 8
879
880=item PL_DBsingle
881X<PL_DBsingle>
882
883When Perl is run in debugging mode, with the B<-d> switch, this SV is a
884boolean which indicates whether subs are being single-stepped.
885Single-stepping is automatically turned on after every step. This is the C
886variable which corresponds to Perl's $DB::single variable. See
887C<PL_DBsub>.
888
889 SV * PL_DBsingle
890
891=for hackers
892Found in file intrpvar.h
893
894=item PL_DBsub
895X<PL_DBsub>
896
897When Perl is run in debugging mode, with the B<-d> switch, this GV contains
898the SV which holds the name of the sub being debugged. This is the C
899variable which corresponds to Perl's $DB::sub variable. See
900C<PL_DBsingle>.
901
902 GV * PL_DBsub
903
904=for hackers
905Found in file intrpvar.h
906
907=item PL_DBtrace
908X<PL_DBtrace>
909
910Trace variable used when Perl is run in debugging mode, with the B<-d>
911switch. This is the C variable which corresponds to Perl's $DB::trace
912variable. See C<PL_DBsingle>.
913
914 SV * PL_DBtrace
915
916=for hackers
917Found in file intrpvar.h
918
919=item PL_dowarn
920X<PL_dowarn>
921
922The C variable which corresponds to Perl's $^W warning variable.
923
924 bool PL_dowarn
925
926=for hackers
927Found in file intrpvar.h
928
929=item PL_last_in_gv
930X<PL_last_in_gv>
931
932The GV which was last used for a filehandle input operation. (C<< <FH> >>)
933
934 GV* PL_last_in_gv
935
936=for hackers
937Found in file intrpvar.h
938
939=item PL_ofs_sv
940X<PL_ofs_sv>
941
942The output field separator - C<$,> in Perl space.
943
944 SV* PL_ofs_sv
945
946=for hackers
947Found in file intrpvar.h
948
949=item PL_rs
950X<PL_rs>
951
952The input record separator - C<$/> in Perl space.
953
954 SV* PL_rs
955
956=for hackers
957Found in file intrpvar.h
958
959
960=back
961
a4f1a029 962=head1 Stack Manipulation Macros
963
964=over 8
965
966=item djSP
d8c40edc 967X<djSP>
a4f1a029 968
969Declare Just C<SP>. This is actually identical to C<dSP>, and declares
970a local copy of perl's stack pointer, available via the C<SP> macro.
971See C<SP>. (Available for backward source code compatibility with the
972old (Perl 5.005) thread model.)
973
974 djSP;
975
976=for hackers
977Found in file pp.h
978
979=item LVRET
d8c40edc 980X<LVRET>
a4f1a029 981
982True if this op will be the return value of an lvalue subroutine
983
984=for hackers
985Found in file pp.h
986
987
988=back
989
990=head1 SV Manipulation Functions
991
992=over 8
993
645c22ef 994=item sv_add_arena
d8c40edc 995X<sv_add_arena>
645c22ef 996
997Given a chunk of memory, link it to the head of the list of arenas,
998and split it into a list of free SVs.
999
1000 void sv_add_arena(char* ptr, U32 size, U32 flags)
1001
1002=for hackers
1003Found in file sv.c
1004
1005=item sv_clean_all
d8c40edc 1006X<sv_clean_all>
645c22ef 1007
1008Decrement the refcnt of each remaining SV, possibly triggering a
1009cleanup. This function may have to be called multiple times to free
8fb26106 1010SVs which are in complex self-referential hierarchies.
645c22ef 1011
1012 I32 sv_clean_all()
1013
1014=for hackers
1015Found in file sv.c
1016
1017=item sv_clean_objs
d8c40edc 1018X<sv_clean_objs>
645c22ef 1019
1020Attempt to destroy all objects not yet freed
1021
1022 void sv_clean_objs()
1023
1024=for hackers
1025Found in file sv.c
1026
1027=item sv_free_arenas
d8c40edc 1028X<sv_free_arenas>
645c22ef 1029
1030Deallocate the memory used by all arenas. Note that all the individual SV
1031heads and bodies within the arenas must already have been freed.
1032
1033 void sv_free_arenas()
1034
1035=for hackers
1036Found in file sv.c
1037
a4f1a029 1038
954c1994 1039=back
1040
979f2922 1041=head1 Unicode Support
1042
1043=over 8
1044
1045=item find_uninit_var
1046X<find_uninit_var>
1047
1048Find the name of the undefined variable (if any) that caused the operator o
1049to issue a "Use of uninitialized value" warning.
1050If match is true, only return a name if it's value matches uninit_sv.
1051So roughly speaking, if a unary operator (such as OP_COS) generates a
1052warning, then following the direct child of the op may yield an
1053OP_PADSV or OP_GV that gives the name of the undefined variable. On the
1054other hand, with OP_ADD there are two branches to follow, so we only print
1055the variable name if we get an exact match.
1056
1057The name is returned as a mortal SV.
1058
1059Assumes that PL_op is the op that originally triggered the error, and that
1060PL_comppad/PL_curpad points to the currently executing pad.
1061
1062 SV* find_uninit_var(OP* obase, SV* uninit_sv, bool top)
1063
1064=for hackers
1065Found in file sv.c
1066
1067=item report_uninit
1068X<report_uninit>
1069
1070Print appropriate "Use of uninitialized variable" warning
1071
1072 void report_uninit(SV* uninit_sv)
1073
1074=for hackers
1075Found in file sv.c
1076
1077
1078=back
1079
954c1994 1080=head1 AUTHORS
1081
1c846c1f 1082The autodocumentation system was originally added to the Perl core by
1083Benjamin Stuhl. Documentation is by whoever was kind enough to
954c1994 1084document their functions.
1085
1086=head1 SEE ALSO
1087
1088perlguts(1), perlapi(1)
1089
3f98fbb3 1090=cut
1091
1092 ex: set ro: