From 6caa5a9cfe39f91bc44bba937a0b491f754fe9cd Mon Sep 17 00:00:00 2001 From: Nick Ing-Simmons Date: Sat, 10 May 2003 15:59:26 +0000 Subject: Fix for bugs 21717 and 22140. Win32's lseek claims to have succeeded in pipes etc. Which confuses :perlio and derived layers. So have :unix's "pushed" method stat() the fd and cache non S_ISREG nature. Have Unix_seek fail if fd is NOT S_ISREG to match UNIX behaviour. p4raw-id: //depot/perlio@19475 --- perliol.h | 1 + 1 file changed, 1 insertion(+) (limited to 'perliol.h') diff --git a/perliol.h b/perliol.h index fa399e6f50..47fe6fc679 100644 --- a/perliol.h +++ b/perliol.h @@ -88,6 +88,7 @@ struct _PerlIO { #define PERLIO_F_OPEN 0x00200000 #define PERLIO_F_FASTGETS 0x00400000 #define PERLIO_F_TTY 0x00800000 +#define PERLIO_F_NOTREG 0x01000000 #define PerlIOBase(f) (*(f)) #define PerlIOSelf(f,type) ((type *)PerlIOBase(f)) -- cgit v1.2.1