Gentoo Websites Logo
Go to: Gentoo Home Documentation Forums Lists Bugs Planet Store Wiki Get Gentoo!
View | Details | Raw Unified | Return to bug 36478
Collapse All | Expand All

(-)perl-5.8.2/ext/IO/IO.xs.orig (+5 lines)
Lines 61-66 Link Here
61 
#define PerlIO_fileno(f) fileno(f)
 61 
#define PerlIO_fileno(f) fileno(f)
62 
#endif
 62 
#endif
63 

          63
          

        

            

              
              
              64
              
/* Added for Linux/SPARCs */

            

            

              65
              
#if defined(__linux__) && defined(__sparc__) && defined(O_NDELAY)

            

            

              66
              
#undef O_NDELAY

            

            

              67
              
#endif

            

            

              68
              

            

        

          64
          
static int

          69
          
static int

        

        

          65
          
io_blocking(pTHX_ InputStream f, int block)

          70
          
io_blocking(pTHX_ InputStream f, int block)

        

        

          66
          
{

          71
          
{

        






  

  Return to bug 36478