diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-03-08 14:05:52 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-03-08 14:05:52 +0000 |
commit | ab8e66c141d8d7d892995deba69405e747204cf0 (patch) | |
tree | cdffd175e1c621ed4b824f08fb83aa27d12571ff /pad.c | |
parent | 1baeb4021808a25a79f3d2b37144610045a5c5c9 (diff) | |
download | perl-ab8e66c141d8d7d892995deba69405e747204cf0.tar.gz |
In comments, correct two instances of SVf_PADSTALE to SVs_PADSTALE.
Diffstat (limited to 'pad.c')
-rw-r--r-- | pad.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -101,13 +101,13 @@ 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, +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 */ |