diff options
| author | David Mitchell <davem@iabyn.com> | 2010-06-07 18:23:43 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2010-06-07 18:23:43 +0100 |
| commit | 16d811d41019c65e82b767b91041c1bebb9b4407 (patch) | |
| tree | ebd62d90d1599c98deb9b2c3db0aed9871cdd9e6 /intrpvar.h | |
| parent | f2ed9b323720c96381a3407a26ac73176799e8ee (diff) | |
| download | perl-16d811d41019c65e82b767b91041c1bebb9b4407.tar.gz | |
identify a few vars in intrpvar.h
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/intrpvar.h b/intrpvar.h index eb398fc2c0..138895a2fd 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -279,22 +279,22 @@ PERLVARI(Isig_pending, int,0) /* Number if highest signal pending */ PERLVAR(Ipsig_pend, int *) /* per-signal "count" of pending */ /* shortcuts to various I/O objects */ -PERLVAR(Istdingv, GV *) -PERLVAR(Istderrgv, GV *) +PERLVAR(Istdingv, GV *) /* *STDIN */ +PERLVAR(Istderrgv, GV *) /* *STDERR */ PERLVAR(Idefgv, GV *) -PERLVAR(Iargvgv, GV *) -PERLVAR(Iargvoutgv, GV *) +PERLVAR(Iargvgv, GV *) /* *ARGV */ +PERLVAR(Iargvoutgv, GV *) /* *ARGVOUT */ PERLVAR(Iargvout_stack, AV *) /* shortcuts to regexp stuff */ -PERLVAR(Ireplgv, GV *) +PERLVAR(Ireplgv, GV *) /* *^R */ /* shortcuts to misc objects */ -PERLVAR(Ierrgv, GV *) +PERLVAR(Ierrgv, GV *) /* *@ */ /* shortcuts to debugging objects */ -PERLVAR(IDBgv, GV *) -PERLVAR(IDBline, GV *) +PERLVAR(IDBgv, GV *) /* *DB::DB */ +PERLVAR(IDBline, GV *) /* *DB::line */ /* =for apidoc mn|GV *|PL_DBsub @@ -318,10 +318,10 @@ variable. See C<PL_DBsingle>. =cut */ -PERLVAR(IDBsub, GV *) -PERLVAR(IDBsingle, SV *) -PERLVAR(IDBtrace, SV *) -PERLVAR(IDBsignal, SV *) +PERLVAR(IDBsub, GV *) /* *DB::sub */ +PERLVAR(IDBsingle, SV *) /* $DB::single */ +PERLVAR(IDBtrace, SV *) /* $DB::trace */ +PERLVAR(IDBsignal, SV *) /* $DB::signal */ PERLVAR(Idbargs, AV *) /* args to call listed by caller function */ /* symbol tables */ |