summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-11-06 23:05:49 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-11-06 23:05:49 +0000
commite3f494f1ad12aae0db4dead20ca74fde31e03266 (patch)
tree704694bacd5773cf54fd07fbd0607ef8d3aaa9c9 /toke.c
parentc1d9e6fa784f00d692c277f4934d2a98bb4644e4 (diff)
downloadperl-e3f494f1ad12aae0db4dead20ca74fde31e03266.tar.gz
glibc5 detection by __GNU_LIBRARY__.
p4raw-id: //depot/perl@7582
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c10
1 files changed, 8 insertions, 2 deletions
diff --git a/toke.c b/toke.c
index 98ef9b9fb5..30a861a8af 100644
--- a/toke.c
+++ b/toke.c
@@ -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