diff options
author | Andrej Borsenkow <Andrej.Borsenkow@mow.siemens.ru> | 2002-05-08 14:33:14 +0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-08 12:30:53 +0000 |
commit | 31d9e88bfc81dd1df0046dae881ec9f94b7aa50f (patch) | |
tree | d0e379bac9fe77a2f5dd7e477e95798aa8517667 /ext/File | |
parent | caa9d8804e0bff3e31fb731f41ebc68464f2a6b5 (diff) | |
download | perl-31d9e88bfc81dd1df0046dae881ec9f94b7aa50f.tar.gz |
RE: [ID 20020507.001] PATCH: 5.6.1: glob() problem on ReliantUNIX with LFS support
Message-ID: <6134254DE87BD411908B00A0C99B044F02E89A6A@mowd019a.mow.siemens.ru>
p4raw-id: //depot/perl@16480
Diffstat (limited to 'ext/File')
-rw-r--r-- | ext/File/Glob/bsd_glob.c | 19 |
1 files changed, 18 insertions, 1 deletions
diff --git a/ext/File/Glob/bsd_glob.c b/ext/File/Glob/bsd_glob.c index 7ec58aa489..6989df883c 100644 --- a/ext/File/Glob/bsd_glob.c +++ b/ext/File/Glob/bsd_glob.c @@ -207,7 +207,24 @@ my_readdir(DIR *d) #endif } #else -#define my_readdir readdir + +/* ReliantUNIX (OS formerly known as SINIX) defines readdir + * in LFS-mode to be a 64-bit version of readdir. */ + +# ifdef sinix +static Direntry_t * my_readdir(DIR*); + +static Direntry_t * +my_readdir(DIR *d) +{ + return readdir(d); +} +# else + +# define my_readdir readdir + +# endif + #endif #ifdef MACOS_TRADITIONAL |