Re: fpending and QNX

[Bruno Haible]

Hi Jim,

> > This patch to fpending.m4 should be useful for QNX. But I don't feel
> > that it's safe committing it until someone with access to a QNX system has
> > verified it. Do you have any testers in the QNX users camp?
> 
> I don't know of anyone who builds gnulib-based tools on QNX,
> but I'll send you (separately) the name of someone I know at QNX.

Our QNX peer person has verified that this modified patch passes on QNX:

  PASS: test-fpending.sh

therefore I'm applying it:


2007-11-06  Bruno Haible  <address@hidden>

        * m4/fpending.m4 (gl_FUNC_FPENDING): Add a variant for QNX.

*** m4/fpending.m4.orig 2007-11-07 01:22:03.000000000 +0100
--- m4/fpending.m4      2007-11-06 00:12:52.000000000 +0100
***************
*** 1,4 ****
! #serial 11
  
  # Copyright (C) 2000, 2001, 2004, 2005, 2006, 2007 Free Software
  # Foundation, Inc.
--- 1,4 ----
! #serial 12
  
  # Copyright (C) 2000, 2001, 2004, 2005, 2006, 2007 Free Software
  # Foundation, Inc.
***************
*** 30,60 ****
              [how to determine the number of pending output bytes on a stream],
                   ac_cv_sys_pending_output_n_bytes,
        [
!       for ac_expr in                                          \
!                                                               \
!           '# glibc2'                                          \
!           'fp->_IO_write_ptr - fp->_IO_write_base'            \
!                                                               \
!           '# traditional Unix'                                \
!           'fp->_ptr - fp->_base'                              \
!                                                               \
!           '# BSD'                                             \
!           'fp->_p - fp->_bf._base'                            \
!                                                               \
!           '# SCO, Unixware'                                   \
!           '(fp->__ptr ? fp->__ptr - fp->__base : 0)'          \
!                                                               \
!           '# old glibc?'                                      \
!           'fp->__bufp - fp->__buffer'                         \
!                                                               \
!           '# old glibc iostream?'                             \
!           'fp->_pptr - fp->_pbase'                            \
!                                                               \
!           '# VMS'                                             \
!           '(*fp)->_ptr - (*fp)->_base'                        \
!                                                               \
!           '# e.g., DGUX R4.11; the info is not available'     \
!           1                                                   \
            ; do
  
          # Skip each embedded comment.
--- 30,63 ----
              [how to determine the number of pending output bytes on a stream],
                   ac_cv_sys_pending_output_n_bytes,
        [
!       for ac_expr in                                                    \
!                                                                         \
!           '# glibc2'                                                    \
!           'fp->_IO_write_ptr - fp->_IO_write_base'                      \
!                                                                         \
!           '# traditional Unix'                                          \
!           'fp->_ptr - fp->_base'                                        \
!                                                                         \
!           '# BSD'                                                       \
!           'fp->_p - fp->_bf._base'                                      \
!                                                                         \
!           '# SCO, Unixware'                                             \
!           '(fp->__ptr ? fp->__ptr - fp->__base : 0)'                    \
!                                                                         \
!           '# QNX'                                                       \
!           '(fp->_Mode & 0x2000 /*_MWRITE*/ ? fp->_Next - fp->_Buf : 0)' \
!                                                                         \
!           '# old glibc?'                                                \
!           'fp->__bufp - fp->__buffer'                                   \
!                                                                         \
!           '# old glibc iostream?'                                       \
!           'fp->_pptr - fp->_pbase'                                      \
!                                                                         \
!           '# VMS'                                                       \
!           '(*fp)->_ptr - (*fp)->_base'                                  \
!                                                                         \
!           '# e.g., DGUX R4.11; the info is not available'               \
!           1                                                             \
            ; do
  
          # Skip each embedded comment.