diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-14 21:00:23 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-14 21:00:23 +0000 |
| commit | ee2f7564be77581fd9f8286aa19a5636c1c1d015 (patch) | |
| tree | ec4c39432c11fb15a56fccf782b27c0c18f7681b /perl.c | |
| parent | a57276195f41851b5b1a611ec714f657a51fe543 (diff) | |
| download | perl-ee2f7564be77581fd9f8286aa19a5636c1c1d015.tar.gz | |
Add comments to mark where $^X is being handled.
p4raw-id: //depot/perl@13000
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3440,7 +3440,7 @@ S_init_postdump_symbols(pTHX_ register int argc, register char **argv, register magicname("0", "0", 1); #endif } - if ((tmpgv = gv_fetchpv("\030",TRUE, SVt_PV))) + if ((tmpgv = gv_fetchpv("\030",TRUE, SVt_PV))) /* $^X */ #ifdef OS2 sv_setpv(GvSV(tmpgv), os2_execname(aTHX)); #else |