diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-06 23:05:49 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-06 23:05:49 +0000 |
commit | e3f494f1ad12aae0db4dead20ca74fde31e03266 (patch) | |
tree | 704694bacd5773cf54fd07fbd0607ef8d3aaa9c9 /toke.c | |
parent | c1d9e6fa784f00d692c277f4934d2a98bb4644e4 (diff) | |
download | perl-e3f494f1ad12aae0db4dead20ca74fde31e03266.tar.gz |
glibc5 detection by __GNU_LIBRARY__.
p4raw-id: //depot/perl@7582
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 10 |
1 files changed, 8 insertions, 2 deletions
@@ -2523,10 +2523,16 @@ Perl_yylex(pTHX) bool bof = PL_rsfp ? TRUE : FALSE; if (bof) { #ifdef PERLIO_IS_STDIO -# ifdef __GLIBC__ -# if __GLIBC__ == 1 /* Linux glibc5 */ +# ifdef __GNU_LIBRARY__ +# if __GNU_LIBRARY__ == 1 /* Linux glibc5 */ # define FTELL_FOR_PIPE_IS_BROKEN # endif +# else +# ifdef __GLIBC__ +# if __GLIBC__ == 1 /* maybe some glibc5 release had it like this? */ +# define FTELL_FOR_PIPE_IS_BROKEN +# endif +# endif # endif #endif #ifdef FTELL_FOR_PIPE_IS_BROKEN |