found 164615 5.8.8-7
thanks

On Sun, Oct 13, 2002 at 09:24:09PM -0000, KORN Andras wrote:
 
> fileno(0x0030d1e0)                                = 1
> dup(1, 0x0030d1e0, 0x08148cc8, 0, 2)              = 3
> fdopen(3, 0xb96bb8b4, 0x0030d1e0, 0x0025b05e, 0x08134440) = 0
> fileno(0 <unfinished ...>
> --- SIGSEGV (Segmentation fault) ---
> +++ killed by SIGSEGV +++
> 
> perl shouldn't attempt the fileno() call after fdopen returned NULL.

This is still present in 5.8.8-7 with PERLIO=stdio.

% PERLIO=stdio perl -e 'open(F, "<&STDOUT")' 1< /dev/null
zsh: segmentation fault  PERLIO=stdio perl -e 'open(F, "<&STDOUT")' 1< /dev/null

Cheers,
-- 
Niko Tyni   [EMAIL PROTECTED]


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to