SM0 She11

Path: / / usr / lib64 / perl5 / CORE

Full Path (server): /usr/lib64/perl5/CORE

Create Fil3

Upl04d Fil3

• 📄 EXTERN.h [E] [D]
  [R]
• 📄 INTERN.h [E] [D]
  [R]
• 📄 XSUB.h [E] [D]
  [R]
• 📄 av.h [E] [D]
  [R]
• 📄 bitcount.h [E] [D]
  [R]
• 📄 charclass_invlists.h [E] [D]
  [R]
• 📄 config.h [E] [D]
  [R]
• 📄 cop.h [E] [D]
  [R]
• 📄 cv.h [E] [D]
  [R]
• 📄 dosish.h [E] [D]
  [R]
• 📄 embed.h [E] [D]
  [R]
• 📄 embedvar.h [E] [D]
  [R]
• 📄 fakesdio.h [E] [D]
  [R]
• 📄 fakethr.h [E] [D]
  [R]
• 📄 feature.h [E] [D]
  [R]
• 📄 form.h [E] [D]
  [R]
• 📄 git_version.h [E] [D]
  [R]
• 📄 gv.h [E] [D]
  [R]
• 📄 handy.h [E] [D]
  [R]
• 📄 hv.h [E] [D]
  [R]
• 📄 intrpvar.h [E] [D]
  [R]
• 📄 iperlsys.h [E] [D]
  [R]
• 📄 keywords.h [E] [D]
  [R]
• 📄 l1_char_class_tab.h [E] [D]
  [R]
• 📄 libperl.so [E] [D]
  [R]
• 📄 malloc_ctl.h [E] [D]
  [R]
• 📄 metaconfig.h [E] [D]
  [R]
• 📄 mg.h [E] [D]
  [R]
• 📄 mg_data.h [E] [D]
  [R]
• 📄 mg_raw.h [E] [D]
  [R]
• 📄 mg_vtable.h [E] [D]
  [R]
• 📄 mydtrace.h [E] [D]
  [R]
• 📄 nostdio.h [E] [D]
  [R]
• 📄 op.h [E] [D]
  [R]
• 📄 op_reg_common.h [E] [D]
  [R]
• 📄 opcode.h [E] [D]
  [R]
• 📄 opnames.h [E] [D]
  [R]
• 📄 overload.h [E] [D]
  [R]
• 📄 pad.h [E] [D]
  [R]
• 📄 parser.h [E] [D]
  [R]
• 📄 patchlevel.h [E] [D]
  [R]
• 📄 perl.h [E] [D]
  [R]
• 📄 perlapi.h [E] [D]
  [R]
• 📄 perldtrace.h [E] [D]
  [R]
• 📄 perlio.h [E] [D]
  [R]
• 📄 perliol.h [E] [D]
  [R]
• 📄 perlsdio.h [E] [D]
  [R]
• 📄 perlsfio.h [E] [D]
  [R]
• 📄 perlvars.h [E] [D]
  [R]
• 📄 perly.h [E] [D]
  [R]
• 📄 pp.h [E] [D]
  [R]
• 📄 pp_proto.h [E] [D]
  [R]
• 📄 proto.h [E] [D]
  [R]
• 📄 reentr.h [E] [D]
  [R]
• 📄 regcharclass.h [E] [D]
  [R]
• 📄 regcomp.h [E] [D]
  [R]
• 📄 regexp.h [E] [D]
  [R]
• 📄 regnodes.h [E] [D]
  [R]
• 📄 scope.h [E] [D]
  [R]
• 📄 sv.h [E] [D]
  [R]
• 📄 thread.h [E] [D]
  [R]
• 📄 time64.h [E] [D]
  [R]
• 📄 time64_config.h [E] [D]
  [R]
• 📄 uconfig.h [E] [D]
  [R]
• 📄 unixish.h [E] [D]
  [R]
• 📄 utf8.h [E] [D]
  [R]
• 📄 utfebcdic.h [E] [D]
  [R]
• 📄 util.h [E] [D]
  [R]
• 📄 uudmap.h [E] [D]
  [R]
• 📄 warnings.h [E] [D]
  [R]

Editing: av.h

/* av.h * * Copyright (C) 1991, 1992, 1993, 1995, 1996, 1997, 1998, 1999, 2000, * 2001, 2002, 2005, 2006, 2007, 2008, by Larry Wall and others * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. * */ struct xpvav { HV* xmg_stash; /* class package */ union _xmgu xmg_u; SSize_t xav_fill; /* Index of last element present */ SSize_t xav_max; /* max index for which array has space */ SV** xav_alloc; /* pointer to beginning of C array of SVs */ }; /* SV* xav_arylen; */ /* SVpav_REAL is set for all AVs whose xav_array contents are refcounted. * Some things like "@_" and the scratchpad list do not set this, to * indicate that they are cheating (for efficiency) by not refcounting * the AV's contents. * * SVpav_REIFY is only meaningful on such "fake" AVs (i.e. where SVpav_REAL * is not set). It indicates that the fake AV is capable of becoming * real if the array needs to be modified in some way. Functions that * modify fake AVs check both flags to call av_reify() as appropriate. * * Note that the Perl stack has neither flag set. (Thus, * items that go on the stack are never refcounted.) * * These internal details are subject to change any time. AV * manipulations external to perl should not care about any of this. * GSAR 1999-09-10 */ /* =head1 Handy Values =for apidoc AmU||Nullav Null AV pointer. (deprecated - use C<(AV *)NULL> instead) =head1 Array Manipulation Functions =for apidoc Am|int|AvFILL|AV* av Same as C<av_len()>. Deprecated, use C<av_len()> instead. =cut */ #ifndef PERL_CORE # define Nullav Null(AV*) #endif #define AvARRAY(av) ((av)->sv_u.svu_array) #define AvALLOC(av) ((XPVAV*) SvANY(av))->xav_alloc #define AvMAX(av) ((XPVAV*) SvANY(av))->xav_max #define AvFILLp(av) ((XPVAV*) SvANY(av))->xav_fill #define AvARYLEN(av) (*Perl_av_arylen_p(aTHX_ MUTABLE_AV(av))) #define AvREAL(av) (SvFLAGS(av) & SVpav_REAL) #define AvREAL_on(av) (SvFLAGS(av) |= SVpav_REAL) #define AvREAL_off(av) (SvFLAGS(av) &= ~SVpav_REAL) #define AvREAL_only(av) (AvREIFY_off(av), SvFLAGS(av) |= SVpav_REAL) #define AvREIFY(av) (SvFLAGS(av) & SVpav_REIFY) #define AvREIFY_on(av) (SvFLAGS(av) |= SVpav_REIFY) #define AvREIFY_off(av) (SvFLAGS(av) &= ~SVpav_REIFY) #define AvREIFY_only(av) (AvREAL_off(av), SvFLAGS(av) |= SVpav_REIFY) #define AvREALISH(av) (SvFLAGS(av) & (SVpav_REAL|SVpav_REIFY)) #define AvFILL(av) ((SvRMAGICAL((const SV *) (av))) \ ? mg_size(MUTABLE_SV(av)) : AvFILLp(av)) #define NEGATIVE_INDICES_VAR "NEGATIVE_INDICES" /* =for apidoc newAV Creates a new AV. The reference count is set to 1. Perl equivalent: C<my @array;>. =cut */ #define newAV() MUTABLE_AV(newSV_type(SVt_PVAV)) /* * Local variables: * c-indentation-style: bsd * c-basic-offset: 4 * indent-tabs-mode: t * End: * * ex: set ts=8 sts=4 sw=4 noet: */
Save