X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pad.c;h=f94125269231847c46685f3a537edfdac08d18ee;hb=9e5bbba0de25c01ae9355c7a97e237602a37e9f3;hp=fdf4402af594b9b29cd2f50f0c72627ef6070e11;hpb=20381b504d5d07ea910daed28e4f149e5e1a26d7;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pad.c b/pad.c index fdf4402..f941252 100644 --- a/pad.c +++ b/pad.c @@ -101,13 +101,13 @@ become so if C 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, +The flag SVs_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(); -For state vars, SVf_PADSTALE is overloaded to mean 'not yet initialised' +For state vars, SVs_PADSTALE is overloaded to mean 'not yet initialised' =cut */