diff options
| author | Doug MacEachern <dougm@covalent.net> | 2001-02-16 07:25:36 -0800 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-17 16:40:07 +0000 |
| commit | 9cbac4c72b52b6fc0e8ad9e0050c6aa0b905a8e7 (patch) | |
| tree | 28d87cc28cbc8a6b13a2d131306618d4356fc771 /doio.c | |
| parent | 675d96b54a60143fa8ba5fa0a3543e6041006509 (diff) | |
| download | perl-9cbac4c72b52b6fc0e8ad9e0050c6aa0b905a8e7.tar.gz | |
[patch] -Wall
Message-ID: <Pine.LNX.4.21.0102161519500.30352-100000@mako.covalent.net>
p4raw-id: //depot/perl@8815
Diffstat (limited to 'doio.c')
| -rw-r--r-- | doio.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -84,7 +84,6 @@ Perl_do_openn(pTHX_ GV *gv, register char *name, I32 len, int as_raw, bool was_fdopen = FALSE; bool in_raw = 0, in_crlf = 0, out_raw = 0, out_crlf = 0; char *type = NULL; - char *deftype = NULL; char mode[4]; /* stdio file mode ("r\0", "rb\0", "r+b\0" etc.) */ SV *svs = (num_svs) ? *svp : Nullsv; @@ -216,7 +215,7 @@ Perl_do_openn(pTHX_ GV *gv, register char *name, I32 len, int as_raw, len = tend-type; } IoTYPE(io) = *type; - if (*type == IoTYPE_RDWR && (!num_svs || tend > type+1 && tend[-1] != IoTYPE_PIPE)) { /* scary */ + if ((*type == IoTYPE_RDWR) && ((!num_svs || tend > type+1 && tend[-1] != IoTYPE_PIPE))) { /* scary */ mode[1] = *type++; writing = 1; } |