diff options
| author | Craig A. Berry <craigberry@mac.com> | 2001-03-28 04:55:20 -0600 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-28 17:11:12 +0000 |
| commit | 275feba9fbd11230522bfce6c95502094ff651f6 (patch) | |
| tree | 42f3e1ae01463356ba7d81579210d3aacf11f7b4 /ext/IO | |
| parent | 3d293bb6615e67800e5f314b6dbfa313554bfd58 (diff) | |
| download | perl-275feba9fbd11230522bfce6c95502094ff651f6.tar.gz | |
VMS fix-ups and status
Message-Id: <5.0.2.1.0.20010327164600.031563e8@exchi01>
p4raw-id: //depot/perl@9414
Diffstat (limited to 'ext/IO')
| -rw-r--r-- | ext/IO/IO.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/IO/IO.xs b/ext/IO/IO.xs index 4987b3d555..3abc94b274 100644 --- a/ext/IO/IO.xs +++ b/ext/IO/IO.xs @@ -420,7 +420,7 @@ sockatmark (sock) InputStream sock PROTOTYPE: $ PREINIT: - int fd,flag,result; + int fd,flag=0; CODE: { fd = PerlIO_fileno(sock); |