develooper Front page | perl.perl5.porters | Postings from February 2003

SvPADSTALE

Thread Next
From:
A . Bergman
Date:
February 5, 2003 23:39
Subject:
SvPADSTALE
Message ID:
215CA1C2-39A6-11D7-9C2D-003065D64CBE@nanisky.com
Hi,

Looking for unused flags I noticed SvPADSTALE, it is rarely used and 
never tested.

tiilt% grep -r "PADSTALE" *
dump.c:    if (flags & SVs_PADSTALE)    sv_catpv(d, "PADSTALE,");
scope.c:    SvPADSTALE_off(*svp); /* mark lexical as active */
scope.c:                SvPADSTALE_on(sv); /* mark as no longer live */
scope.c:                SvFLAGS(*(SV**)ptr) |= padflags & SVs_PADSTALE;
sv.h:#define SVs_PADSTALE       0x00000100      /* lexical has gone out 
of scope */
sv.h:#define SvPADSTALE(sv)             (SvFLAGS(sv) & SVs_PADSTALE)
sv.h:#define SvPADSTALE_on(sv)  (SvFLAGS(sv) |= SVs_PADSTALE)
sv.h:#define SvPADSTALE_off(sv) (SvFLAGS(sv) &= ~SVs_PADSTALE)


Maybe it could be recycled?

Arthur


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About