diff options
| author | Abhijit Menon-Sen <ams@wiw.org> | 2001-07-06 06:56:32 +0530 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-07-06 01:11:50 +0000 |
| commit | a27978d3b51a1694fbb3bf9d13a41f0518386f5c (patch) | |
| tree | 7bff78ca93daef4611e6e1254a6fd73e14b860dc /dump.c | |
| parent | 82c397ed3a4951f2883d92a4a7f58893312cd077 (diff) | |
| download | perl-a27978d3b51a1694fbb3bf9d13a41f0518386f5c.tar.gz | |
(Retracted by #11285.)
Subject: Re: [PATCH] mkdir() mode argument is missing initial 0
Message-ID: <20010706012632.A28327@lustre.dyn.wiw.org>
p4raw-id: //depot/perl@11166
Diffstat (limited to 'dump.c')
| -rw-r--r-- | dump.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -519,6 +519,8 @@ Perl_do_op_dump(pTHX_ I32 level, PerlIO *file, OP *o) else if (o->op_type == OP_CONST) { if (o->op_private & OPpCONST_BARE) sv_catpv(tmpsv, ",BARE"); + if (o->op_private & OPpCONST_OCTAL) + sv_catpv(tmpsv, ",OCTAL"); if (o->op_private & OPpCONST_STRICT) sv_catpv(tmpsv, ",STRICT"); if (o->op_private & OPpCONST_ARYBASE) |