X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=av.h;h=0d041b67e9e410d8cad7f73aaac6a382c3e70721;hb=5b3e00df85f0acd4faa55a140aa762a15b19dca3;hp=6b66bfd1b1de62b64eed41f3ca1250127ceb83e7;hpb=cb50131aab68ac6dda048612c6e853b8cb08701e;p=p5sagit%2Fp5-mst-13.2.git diff --git a/av.h b/av.h index 6b66bfd..0d041b6 100644 --- a/av.h +++ b/av.h @@ -1,6 +1,6 @@ /* av.h * - * Copyright (c) 1991-2000, Larry Wall + * Copyright (c) 1991-2001, Larry Wall * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -16,7 +16,7 @@ struct xpvav { MAGIC* xmg_magic; /* magic for scalar array */ HV* xmg_stash; /* class package */ - SV** xav_alloc; /* pointer to malloced string */ + SV** xav_alloc; /* pointer to beginning of C array of SVs */ SV* xav_arylen; U8 xav_flags; }; @@ -32,8 +32,8 @@ struct xpvav { * 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.) + * Note that the Perl stack and @DB::args have 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. @@ -46,9 +46,13 @@ struct xpvav { #define AVf_REUSED 4 /* got undeffed--don't turn old memory into SVs now */ /* +=head1 Handy Values + =for apidoc AmU||Nullav Null AV pointer. +=head1 Array Manipulation Functions + =for apidoc Am|int|AvFILL|AV* av Same as C. Deprecated, use C instead.