diff options
| -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 */ |