diff options
| author | Larry Wall <lwall@scalpel.netlabs.com> | 1995-11-21 10:01:00 +1200 |
|---|---|---|
| committer | Larry <lwall@scalpel.netlabs.com> | 1995-11-21 10:01:00 +1200 |
| commit | 4633a7c4bad06b471d9310620b7fe8ddd158cccd (patch) | |
| tree | 37ebeb26a64f123784fd8fac6243b124767243b0 /av.h | |
| parent | 8e07c86ebc651fe92eb7e3b25f801f57cfb8dd6f (diff) | |
| download | perl-4633a7c4bad06b471d9310620b7fe8ddd158cccd.tar.gz | |
5.002 beta 1
If you're adventurous, have a look at
ftp://ftp.sems.com/pub/outgoing/perl5.0/perl5.002beta1.tar.gz
Many thanks to Andy for doing the integration.
Obviously, if you consult the bugs database, you'll note there are
still plenty of buglets that need fixing, and several enhancements that
I've intended to put in still haven't made it in (Hi, Tim and Ilya).
But I think it'll be pretty stable. And you can start to fiddle around
with prototypes (which are, of course, still totally undocumented).
Packrats, don't worry too much about readvertising this widely.
Nowadays we're on a T1 here, so our bandwidth is okay.
Have the appropriate amount of jollity.
Larry
Diffstat (limited to 'av.h')
| -rw-r--r-- | av.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -23,6 +23,7 @@ struct xpvav { #define AVf_REAL 1 /* free old entries */ #define AVf_REIFY 2 /* can become real */ +#define AVf_REUSED 4 /* got undeffed--don't turn old memory into SVs now */ #define Nullav Null(AV*) @@ -39,6 +40,9 @@ struct xpvav { #define AvREIFY(av) (AvFLAGS(av) & AVf_REIFY) #define AvREIFY_on(av) (AvFLAGS(av) |= AVf_REIFY) #define AvREIFY_off(av) (AvFLAGS(av) &= ~AVf_REIFY) +#define AvREUSED(av) (AvFLAGS(av) & AVf_REUSED) +#define AvREUSED_on(av) (AvFLAGS(av) |= AVf_REUSED) +#define AvREUSED_off(av) (AvFLAGS(av) &= ~AVf_REUSED) #define AvREALISH(av) AvFLAGS(av) /* REAL or REIFY -- shortcut */ |