From: Dave Mitchell <davem@fdisolutions.com>
Date: Fri, 20 Feb 2004 14:18:13 +0000 (+0000)
Subject: Document the SVf_PADSTALE flag
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e6e7068b743187ea85db546863975a687c18915d;p=p5sagit%2Fp5-mst-13.2.git

Document the SVf_PADSTALE flag

p4raw-id: //depot/perl@22348
---

diff --git a/pad.c b/pad.c
index 06f0417..316833d 100644
--- a/pad.c
+++ b/pad.c
@@ -91,6 +91,12 @@ become so if C<my sub foo {}> is implemented.)
 Note that formats are treated as anon subs, and are cloned each time
 write is called (if necessary).
 
+The flag SVf_PADSTALE is cleared on lexicals each time the my() is executed,
+and set on scope exit. This allows the 'Variable $x is not available' warning
+to be generated in evals, such as 
+
+    { my $x = 1; sub f { eval '$x'} } f();
+
 =cut
 */