Remove PERL_MAGIC_mutex
[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
a3985cdc 334=head1 Functions in file pp_ctl.c
335
336
337=over 8
338
339=item find_runcv
d8c40edc 340X<find_runcv>
a3985cdc 341
342Locate the CV corresponding to the currently executing sub or eval.
d819b83a 343If db_seqp is non_null, skip CVs that are in the DB package and populate
344*db_seqp with the cop sequence number at the point that the DB:: code was
345entered. (allows debuggers to eval in the scope of the breakpoint rather
324092c6 346than in the scope of the debugger itself).
a3985cdc 347
d819b83a 348 CV* find_runcv(U32 *db_seqp)
a3985cdc 349
350=for hackers
351Found in file pp_ctl.c
352
353
354=back
355
a4f1a029 356=head1 GV Functions
357
358=over 8
359
360=item is_gv_magical
d8c40edc 361X<is_gv_magical>
a4f1a029 362
363Returns C<TRUE> if given the name of a magical GV.
364
365Currently only useful internally when determining if a GV should be
366created even in rvalue contexts.
367
368C<flags> is not used at present but available for future extension to
369allow selecting particular classes of magical variable.
370
766f8916 371Currently assumes that C<name> is NUL terminated (as well as len being valid).
372This assumption is met by all callers within the perl core, which all pass
373pointers returned by SvPV.
374
7fc63493 375 bool is_gv_magical(const char *name, STRLEN len, U32 flags)
376
377=for hackers
378Found in file gv.c
379
380=item is_gv_magical_sv
d8c40edc 381X<is_gv_magical_sv>
7fc63493 382
383Returns C<TRUE> if given the name of a magical GV. Calls is_gv_magical.
384
385 bool is_gv_magical_sv(SV *name, U32 flags)
645c22ef 386
387=for hackers
a4f1a029 388Found in file gv.c
389
390
391=back
392
b3ca2e83 393=head1 Hash Manipulation Functions
394
395=over 8
396
bd95ae50 397=item refcounted_he_chain_2hv
398X<refcounted_he_chain_2hv>
399
8a0be661 400Generates and returns a C<HV *> by walking up the tree starting at the passed
bd95ae50 401in C<struct refcounted_he *>.
402
403 HV * refcounted_he_chain_2hv(const struct refcounted_he *c)
404
405=for hackers
406Found in file hv.c
407
b3ca2e83 408=item refcounted_he_free
409X<refcounted_he_free>
410
411Decrements the reference count of the passed in C<struct refcounted_he *>
412by one. If the reference count reaches zero the structure's memory is freed,
413and C<refcounted_he_free> iterates onto the parent node.
414
415 void refcounted_he_free(struct refcounted_he *he)
416
417=for hackers
418Found in file hv.c
419
420=item refcounted_he_new
421X<refcounted_he_new>
422
ec2a1de7 423Creates a new C<struct refcounted_he>. As S<key> is copied, and value is
424stored in a compact form, all references remain the property of the caller.
425The C<struct refcounted_he> is returned with a reference count of 1.
b3ca2e83 426
b46c265e 427 struct refcounted_he * refcounted_he_new(struct refcounted_he *const parent, SV *const key, SV *const value)
b3ca2e83 428
429=for hackers
430Found in file hv.c
431
432
433=back
434
a4f1a029 435=head1 IO Functions
436
437=over 8
645c22ef 438
a8586c98 439=item start_glob
d8c40edc 440X<start_glob>
a8586c98 441
442Function called by C<do_readline> to spawn a glob (or do the glob inside
443perl on VMS). This code used to be inline, but now perl uses C<File::Glob>
bd16a5f0 444this glob starter is only used by miniperl during the build process.
a8586c98 445Moving it away shrinks pp_hot.c; shrinking pp_hot.c helps speed perl up.
446
447 PerlIO* start_glob(SV* pattern, IO *io)
448
449=for hackers
450Found in file doio.c
451
a4f1a029 452
453=back
454
0cbee0a4 455=head1 Magical Functions
456
457=over 8
458
b3ca2e83 459=item magic_sethint
460X<magic_sethint>
461
c28fe1ec 462Triggered by a delete from %^H, records the key to
463C<PL_compiling.cop_hints_hash>.
b3ca2e83 464
465 int magic_sethint(SV* sv, MAGIC* mg)
466
467=for hackers
468Found in file mg.c
469
0cbee0a4 470=item mg_localize
d8c40edc 471X<mg_localize>
0cbee0a4 472
473Copy some of the magic from an existing SV to new localized version of
474that SV. Container magic (eg %ENV, $1, tie) gets copied, value magic
475doesn't (eg taint, pos).
476
477 void mg_localize(SV* sv, SV* nsv)
478
479=for hackers
480Found in file mg.c
481
482
483=back
484
47c9dd14 485=head1 MRO Functions
486
487=over 8
488
489=item mro_isa_changed_in
490X<mro_isa_changed_in>
491
492Takes the necessary steps (cache invalidations, mostly)
493when the @ISA of the given package has changed. Invoked
494by the C<setisa> magic, should not need to invoke directly.
495
496 void mro_isa_changed_in(HV* stash)
497
498=for hackers
499Found in file mro.c
500
501
502=back
503
a4f1a029 504=head1 Pad Data Structures
505
506=over 8
507
508=item CvPADLIST
d8c40edc 509X<CvPADLIST>
a4f1a029 510
511CV's can have CvPADLIST(cv) set to point to an AV.
512
513For these purposes "forms" are a kind-of CV, eval""s are too (except they're
514not callable at will and are always thrown away after the eval"" is done
b5c19bd7 515executing). Require'd files are simply evals without any outer lexical
516scope.
a4f1a029 517
518XSUBs don't have CvPADLIST set - dXSTARG fetches values from PL_curpad,
519but that is really the callers pad (a slot of which is allocated by
520every entersub).
521
522The CvPADLIST AV has does not have AvREAL set, so REFCNT of component items
f3548bdc 523is managed "manual" (mostly in pad.c) rather than normal av.c rules.
a4f1a029 524The items in the AV are not SVs as for a normal AV, but other AVs:
525
5260'th Entry of the CvPADLIST is an AV which represents the "names" or rather
527the "static type information" for lexicals.
528
529The CvDEPTH'th entry of CvPADLIST AV is an AV which is the stack frame at that
530depth of recursion into the CV.
531The 0'th slot of a frame AV is an AV which is @_.
532other entries are storage for variables and op targets.
533
534During compilation:
a6d05634 535C<PL_comppad_name> is set to the names AV.
536C<PL_comppad> is set to the frame AV for the frame CvDEPTH == 1.
537C<PL_curpad> is set to the body of the frame AV (i.e. AvARRAY(PL_comppad)).
a4f1a029 538
f3548bdc 539During execution, C<PL_comppad> and C<PL_curpad> refer to the live
540frame of the currently executing sub.
541
542Iterating over the names AV iterates over all possible pad
a4f1a029 543items. Pad slots that are SVs_PADTMP (targets/GVs/constants) end up having
544&PL_sv_undef "names" (see pad_alloc()).
545
546Only my/our variable (SVs_PADMY/SVs_PADOUR) slots get valid names.
547The rest are op targets/GVs/constants which are statically allocated
548or resolved at compile time. These don't have names by which they
549can be looked up from Perl code at run time through eval"" like
550my/our variables can be. Since they can't be looked up by "name"
551but only by their index allocated at compile time (which is usually
552in PL_op->op_targ), wasting a name SV for them doesn't make sense.
553
554The SVs in the names AV have their PV being the name of the variable.
00a0d662 555xlow+1..xhigh inclusive in the NV union is a range of cop_seq numbers for
556which the name is valid. For typed lexicals name SV is SVt_PVMG and SvSTASH
557points at the type. For C<our> lexicals, the type is also SVt_PVMG, with the
44a2ac75 558SvOURSTASH slot pointing at the stash of the associated global (so that
00a0d662 559duplicate C<our> declarations in the same package can be detected). SvUVX is
560sometimes hijacked to store the generation number during compilation.
a4f1a029 561
b5c19bd7 562If SvFAKE is set on the name SV, then that slot in the frame AV is
563a REFCNT'ed reference to a lexical from "outside". In this case,
00a0d662 564the name SV does not use xlow and xhigh to store a cop_seq range, since it is
565in scope throughout. Instead xhigh stores some flags containing info about
b5c19bd7 566the real lexical (is it declared in an anon, and is it capable of being
00a0d662 567instantiated multiple times?), and for fake ANONs, xlow contains the index
b5c19bd7 568within the parent's pad where the lexical's value is stored, to make
569cloning quicker.
a4f1a029 570
a6d05634 571If the 'name' is '&' the corresponding entry in frame AV
a4f1a029 572is a CV representing a possible closure.
573(SvFAKE and name of '&' is not a meaningful combination currently but could
574become so if C<my sub foo {}> is implemented.)
575
5c3943b6 576Note that formats are treated as anon subs, and are cloned each time
577write is called (if necessary).
578
2814eb74 579The flag SVf_PADSTALE is cleared on lexicals each time the my() is executed,
580and set on scope exit. This allows the 'Variable $x is not available' warning
581to be generated in evals, such as
582
583 { my $x = 1; sub f { eval '$x'} } f();
584
a4f1a029 585 AV * CvPADLIST(CV *cv)
586
587=for hackers
dd2155a4 588Found in file pad.c
589
590=item cv_clone
d8c40edc 591X<cv_clone>
dd2155a4 592
593Clone a CV: make a new CV which points to the same code etc, but which
ad63d80f 594has a newly-created pad built by copying the prototype pad and capturing
dd2155a4 595any outer lexicals.
596
597 CV* cv_clone(CV* proto)
598
599=for hackers
600Found in file pad.c
601
602=item cv_dump
d8c40edc 603X<cv_dump>
dd2155a4 604
605dump the contents of a CV
606
e1ec3a88 607 void cv_dump(const CV *cv, const char *title)
dd2155a4 608
609=for hackers
610Found in file pad.c
611
612=item do_dump_pad
d8c40edc 613X<do_dump_pad>
dd2155a4 614
615Dump the contents of a padlist
616
617 void do_dump_pad(I32 level, PerlIO *file, PADLIST *padlist, int full)
618
619=for hackers
620Found in file pad.c
621
622=item intro_my
d8c40edc 623X<intro_my>
dd2155a4 624
625"Introduce" my variables to visible status.
626
627 U32 intro_my()
628
629=for hackers
630Found in file pad.c
631
632=item pad_add_anon
d8c40edc 633X<pad_add_anon>
dd2155a4 634
635Add an anon code entry to the current compiling pad
636
637 PADOFFSET pad_add_anon(SV* sv, OPCODE op_type)
638
639=for hackers
640Found in file pad.c
641
642=item pad_add_name
d8c40edc 643X<pad_add_name>
dd2155a4 644
b5c19bd7 645Create a new name and associated PADMY SV in the current pad; return the
646offset.
dd2155a4 647If C<typestash> is valid, the name is for a typed lexical; set the
648name's stash to that value.
649If C<ourstash> is valid, it's an our lexical, set the name's
44a2ac75 650SvOURSTASH to that value
dd2155a4 651
dd2155a4 652If fake, it means we're cloning an existing entry
653
952306ac 654 PADOFFSET pad_add_name(const char *name, HV* typestash, HV* ourstash, bool clone, bool state)
dd2155a4 655
656=for hackers
657Found in file pad.c
658
659=item pad_alloc
d8c40edc 660X<pad_alloc>
dd2155a4 661
662Allocate a new my or tmp pad entry. For a my, simply push a null SV onto
663the end of PL_comppad, but for a tmp, scan the pad from PL_padix upwards
324092c6 664for a slot which has no name and no active value.
dd2155a4 665
666 PADOFFSET pad_alloc(I32 optype, U32 tmptype)
667
668=for hackers
669Found in file pad.c
670
671=item pad_block_start
d8c40edc 672X<pad_block_start>
dd2155a4 673
674Update the pad compilation state variables on entry to a new block
675
676 void pad_block_start(int full)
677
678=for hackers
679Found in file pad.c
680
681=item pad_check_dup
d8c40edc 682X<pad_check_dup>
dd2155a4 683
684Check for duplicate declarations: report any of:
685 * a my in the current scope with the same name;
686 * an our (anywhere in the pad) with the same name and the same stash
687 as C<ourstash>
688C<is_our> indicates that the name to check is an 'our' declaration
689
e1ec3a88 690 void pad_check_dup(const char* name, bool is_our, const HV* ourstash)
dd2155a4 691
692=for hackers
693Found in file pad.c
694
695=item pad_findlex
d8c40edc 696X<pad_findlex>
dd2155a4 697
698Find a named lexical anywhere in a chain of nested pads. Add fake entries
b5c19bd7 699in the inner pads if it's found in an outer one.
700
701Returns the offset in the bottom pad of the lex or the fake lex.
702cv is the CV in which to start the search, and seq is the current cop_seq
703to match against. If warn is true, print appropriate warnings. The out_*
704vars return values, and so are pointers to where the returned values
705should be stored. out_capture, if non-null, requests that the innermost
706instance of the lexical is captured; out_name_sv is set to the innermost
707matched namesv or fake namesv; out_flags returns the flags normally
708associated with the IVX field of a fake namesv.
709
710Note that pad_findlex() is recursive; it recurses up the chain of CVs,
711then comes back down, adding fake entries as it goes. It has to be this way
00a0d662 712because fake namesvs in anon protoypes have to store in xlow the index into
b5c19bd7 713the parent pad.
714
e1ec3a88 715 PADOFFSET pad_findlex(const char *name, const CV* cv, U32 seq, int warn, SV** out_capture, SV** out_name_sv, int *out_flags)
dd2155a4 716
717=for hackers
718Found in file pad.c
719
720=item pad_findmy
d8c40edc 721X<pad_findmy>
dd2155a4 722
ad63d80f 723Given a lexical name, try to find its offset, first in the current pad,
dd2155a4 724or failing that, in the pads of any lexically enclosing subs (including
ad63d80f 725the complications introduced by eval). If the name is found in an outer pad,
726then a fake entry is added to the current pad.
dd2155a4 727Returns the offset in the current pad, or NOT_IN_PAD on failure.
728
e1ec3a88 729 PADOFFSET pad_findmy(const char* name)
dd2155a4 730
731=for hackers
732Found in file pad.c
733
734=item pad_fixup_inner_anons
d8c40edc 735X<pad_fixup_inner_anons>
dd2155a4 736
737For any anon CVs in the pad, change CvOUTSIDE of that CV from
7dafbf52 738old_cv to new_cv if necessary. Needed when a newly-compiled CV has to be
739moved to a pre-existing CV struct.
dd2155a4 740
741 void pad_fixup_inner_anons(PADLIST *padlist, CV *old_cv, CV *new_cv)
742
743=for hackers
744Found in file pad.c
745
746=item pad_free
d8c40edc 747X<pad_free>
dd2155a4 748
d7f8936a 749Free the SV at offset po in the current pad.
dd2155a4 750
751 void pad_free(PADOFFSET po)
752
753=for hackers
754Found in file pad.c
755
756=item pad_leavemy
d8c40edc 757X<pad_leavemy>
dd2155a4 758
759Cleanup at end of scope during compilation: set the max seq number for
760lexicals in this scope and warn of any lexicals that never got introduced.
761
762 void pad_leavemy()
763
764=for hackers
765Found in file pad.c
766
767=item pad_new
d8c40edc 768X<pad_new>
dd2155a4 769
ad63d80f 770Create a new compiling padlist, saving and updating the various global
dd2155a4 771vars at the same time as creating the pad itself. The following flags
772can be OR'ed together:
773
774 padnew_CLONE this pad is for a cloned CV
775 padnew_SAVE save old globals
776 padnew_SAVESUB also save extra stuff for start of sub
777
c7c737cb 778 PADLIST* pad_new(int flags)
dd2155a4 779
780=for hackers
781Found in file pad.c
782
783=item pad_push
d8c40edc 784X<pad_push>
dd2155a4 785
786Push a new pad frame onto the padlist, unless there's already a pad at
26019298 787this depth, in which case don't bother creating a new one. Then give
788the new pad an @_ in slot zero.
dd2155a4 789
26019298 790 void pad_push(PADLIST *padlist, int depth)
dd2155a4 791
792=for hackers
793Found in file pad.c
794
795=item pad_reset
d8c40edc 796X<pad_reset>
dd2155a4 797
798Mark all the current temporaries for reuse
799
800 void pad_reset()
801
802=for hackers
803Found in file pad.c
804
805=item pad_setsv
d8c40edc 806X<pad_setsv>
dd2155a4 807
808Set the entry at offset po in the current pad to sv.
809Use the macro PAD_SETSV() rather than calling this function directly.
810
811 void pad_setsv(PADOFFSET po, SV* sv)
812
813=for hackers
814Found in file pad.c
815
816=item pad_swipe
d8c40edc 817X<pad_swipe>
dd2155a4 818
819Abandon the tmp in the current pad at offset po and replace with a
820new one.
821
822 void pad_swipe(PADOFFSET po, bool refadjust)
823
824=for hackers
825Found in file pad.c
826
827=item pad_tidy
d8c40edc 828X<pad_tidy>
dd2155a4 829
830Tidy up a pad after we've finished compiling it:
831 * remove most stuff from the pads of anonsub prototypes;
832 * give it a @_;
833 * mark tmps as such.
834
835 void pad_tidy(padtidy_type type)
836
837=for hackers
838Found in file pad.c
839
840=item pad_undef
d8c40edc 841X<pad_undef>
dd2155a4 842
843Free the padlist associated with a CV.
844If parts of it happen to be current, we null the relevant
845PL_*pad* global vars so that we don't have any dangling references left.
846We also repoint the CvOUTSIDE of any about-to-be-orphaned
a3985cdc 847inner subs to the outer of this cv.
dd2155a4 848
7dafbf52 849(This function should really be called pad_free, but the name was already
850taken)
851
a3985cdc 852 void pad_undef(CV* cv)
dd2155a4 853
854=for hackers
855Found in file pad.c
a4f1a029 856
857
858=back
859
907b3e23 860=head1 Per-Interpreter Variables
861
862=over 8
863
864=item PL_DBsingle
865X<PL_DBsingle>
866
867When Perl is run in debugging mode, with the B<-d> switch, this SV is a
868boolean which indicates whether subs are being single-stepped.
869Single-stepping is automatically turned on after every step. This is the C
870variable which corresponds to Perl's $DB::single variable. See
871C<PL_DBsub>.
872
873 SV * PL_DBsingle
874
875=for hackers
876Found in file intrpvar.h
877
878=item PL_DBsub
879X<PL_DBsub>
880
881When Perl is run in debugging mode, with the B<-d> switch, this GV contains
882the SV which holds the name of the sub being debugged. This is the C
883variable which corresponds to Perl's $DB::sub variable. See
884C<PL_DBsingle>.
885
886 GV * PL_DBsub
887
888=for hackers
889Found in file intrpvar.h
890
891=item PL_DBtrace
892X<PL_DBtrace>
893
894Trace variable used when Perl is run in debugging mode, with the B<-d>
895switch. This is the C variable which corresponds to Perl's $DB::trace
896variable. See C<PL_DBsingle>.
897
898 SV * PL_DBtrace
899
900=for hackers
901Found in file intrpvar.h
902
903=item PL_dowarn
904X<PL_dowarn>
905
906The C variable which corresponds to Perl's $^W warning variable.
907
908 bool PL_dowarn
909
910=for hackers
911Found in file intrpvar.h
912
913=item PL_last_in_gv
914X<PL_last_in_gv>
915
916The GV which was last used for a filehandle input operation. (C<< <FH> >>)
917
918 GV* PL_last_in_gv
919
920=for hackers
921Found in file intrpvar.h
922
923=item PL_ofs_sv
924X<PL_ofs_sv>
925
926The output field separator - C<$,> in Perl space.
927
928 SV* PL_ofs_sv
929
930=for hackers
931Found in file intrpvar.h
932
933=item PL_rs
934X<PL_rs>
935
936The input record separator - C<$/> in Perl space.
937
938 SV* PL_rs
939
940=for hackers
941Found in file intrpvar.h
942
943
944=back
945
a4f1a029 946=head1 Stack Manipulation Macros
947
948=over 8
949
950=item djSP
d8c40edc 951X<djSP>
a4f1a029 952
953Declare Just C<SP>. This is actually identical to C<dSP>, and declares
954a local copy of perl's stack pointer, available via the C<SP> macro.
955See C<SP>. (Available for backward source code compatibility with the
956old (Perl 5.005) thread model.)
957
958 djSP;
959
960=for hackers
961Found in file pp.h
962
963=item LVRET
d8c40edc 964X<LVRET>
a4f1a029 965
966True if this op will be the return value of an lvalue subroutine
967
968=for hackers
969Found in file pp.h
970
971
972=back
973
974=head1 SV Manipulation Functions
975
976=over 8
977
645c22ef 978=item sv_add_arena
d8c40edc 979X<sv_add_arena>
645c22ef 980
981Given a chunk of memory, link it to the head of the list of arenas,
982and split it into a list of free SVs.
983
984 void sv_add_arena(char* ptr, U32 size, U32 flags)
985
986=for hackers
987Found in file sv.c
988
989=item sv_clean_all
d8c40edc 990X<sv_clean_all>
645c22ef 991
992Decrement the refcnt of each remaining SV, possibly triggering a
993cleanup. This function may have to be called multiple times to free
8fb26106 994SVs which are in complex self-referential hierarchies.
645c22ef 995
996 I32 sv_clean_all()
997
998=for hackers
999Found in file sv.c
1000
1001=item sv_clean_objs
d8c40edc 1002X<sv_clean_objs>
645c22ef 1003
1004Attempt to destroy all objects not yet freed
1005
1006 void sv_clean_objs()
1007
1008=for hackers
1009Found in file sv.c
1010
1011=item sv_free_arenas
d8c40edc 1012X<sv_free_arenas>
645c22ef 1013
1014Deallocate the memory used by all arenas. Note that all the individual SV
1015heads and bodies within the arenas must already have been freed.
1016
1017 void sv_free_arenas()
1018
1019=for hackers
1020Found in file sv.c
1021
a4f1a029 1022
954c1994 1023=back
1024
979f2922 1025=head1 Unicode Support
1026
1027=over 8
1028
1029=item find_uninit_var
1030X<find_uninit_var>
1031
1032Find the name of the undefined variable (if any) that caused the operator o
1033to issue a "Use of uninitialized value" warning.
1034If match is true, only return a name if it's value matches uninit_sv.
1035So roughly speaking, if a unary operator (such as OP_COS) generates a
1036warning, then following the direct child of the op may yield an
1037OP_PADSV or OP_GV that gives the name of the undefined variable. On the
1038other hand, with OP_ADD there are two branches to follow, so we only print
1039the variable name if we get an exact match.
1040
1041The name is returned as a mortal SV.
1042
1043Assumes that PL_op is the op that originally triggered the error, and that
1044PL_comppad/PL_curpad points to the currently executing pad.
1045
1046 SV* find_uninit_var(OP* obase, SV* uninit_sv, bool top)
1047
1048=for hackers
1049Found in file sv.c
1050
1051=item report_uninit
1052X<report_uninit>
1053
1054Print appropriate "Use of uninitialized variable" warning
1055
1056 void report_uninit(SV* uninit_sv)
1057
1058=for hackers
1059Found in file sv.c
1060
1061
1062=back
1063
954c1994 1064=head1 AUTHORS
1065
1c846c1f 1066The autodocumentation system was originally added to the Perl core by
1067Benjamin Stuhl. Documentation is by whoever was kind enough to
954c1994 1068document their functions.
1069
1070=head1 SEE ALSO
1071
1072perlguts(1), perlapi(1)
1073
3f98fbb3 1074=cut
1075
1076 ex: set ro: