diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-03-08 20:16:36 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-03-08 20:16:36 +0000 |
| commit | 6e6a1aefada3f56f44128d62c37dcbbe95fd2795 (patch) | |
| tree | cbe3025f7c38ce90120c6c07530a11e25fdb2316 /ext/B/B.pm | |
| parent | 0d6091f7ede280a2010e5a63ecde4e0f251889da (diff) | |
| download | perl-6e6a1aefada3f56f44128d62c37dcbbe95fd2795.tar.gz | |
Add a B::COP::io() method, to return the cop_io field of COPs.
Print it in B::Debug. Can be used later in B::Deparse to deparse
the open pragma.
p4raw-id: //depot/perl@18856
Diffstat (limited to 'ext/B/B.pm')
| -rw-r--r-- | ext/B/B.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/B/B.pm b/ext/B/B.pm index f75e54bae0..ad53e9d135 100644 --- a/ext/B/B.pm +++ b/ext/B/B.pm @@ -1042,6 +1042,8 @@ Only when perl was compiled with ithreads. =item stash +=item stashpv + =item file =item cop_seq @@ -1050,6 +1052,10 @@ Only when perl was compiled with ithreads. =item line +=item warnings + +=item io + =back |