[PATCH] Fix libgfortran on darwin, hpux and cygwin (PR libfortran/24991)

[Jack Howarth]

Andreas,
    Well I am using the gcc 4.1 branch from yesterday (I was waiting for
rth to finish checking in his fixes to list_read.c), However I do see one
oddity in make check (which I may have overlooked before). I see...

Fixed:  widec.h
Xm/Traversal.h /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/Xm/Traversal.h differ: char 296, line 15
*** Xm/Traversal.h      Sat Nov 26 17:33:57 2005
--- /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/Xm/Traversal.h       Wed Nov 23 19:16:51 2005
***************
*** 12,18 ****
  #if defined( X11_NEW_CHECK )
  struct wedge {
  #ifdef __cplusplus
! Widget        old, c_new;
  #else
     Widget     old, new; /* fixinc check FAILS ON BSD */
  #endif
--- 12,18 ----
  #if defined( X11_NEW_CHECK )
  struct wedge {
  #ifdef __cplusplus
!       Widget  old, c_new;
  #else
     Widget     old, new; /* fixinc check FAILS ON BSD */
  #endif
strings.h /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/strings.h differ: char 687, line 31
*** strings.h   Sat Nov 26 17:33:58 2005
--- /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/strings.h    Wed Nov 23 19:16:51 2005
***************
*** 28,39 ****
        strncmp( const char *__s1, const char *__s2, size_t __n );
  
  extern int
! strcasecmp( const char *__s1, const char *__s2),
! strncasecmp( const char *__s1, const char *__s2, size_t __n );
        strncmp();
  extern int
! strcasecmp(),
! strncasecmp();
  
  #endif  /* ULTRIX_STRINGS2_CHECK */
  
--- 28,39 ----
        strncmp( const char *__s1, const char *__s2, size_t __n );
  
  extern int
!       strcasecmp( const char *__s1, const char *__s2),
!       strncasecmp( const char *__s1, const char *__s2, size_t __n );
        strncmp();
  extern int
!       strcasecmp(),
!       strncasecmp();
  
  #endif  /* ULTRIX_STRINGS2_CHECK */
  
sys/stat.h /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/sys/stat.h differ: char 701, line 31
*** sys/stat.h  Sat Nov 26 17:33:58 2005
--- /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/sys/stat.h   Wed Nov 23 19:16:51 2005
***************
*** 28,34 ****
        return __stat32(__f, __p);
  }
  #if __cplusplus
! }
  #endif /* __cplusplus */
  
  #  else /* !__STDC__ THIS FAILS ON BSD SYSTEMS */
--- 28,34 ----
        return __stat32(__f, __p);
  }
  #if __cplusplus
!  }
  #endif /* __cplusplus */
  
  #  else /* !__STDC__ THIS FAILS ON BSD SYSTEMS */
***************
*** 42,48 ****
        return __stat32(__f, __p);
  }
  #if __cplusplus
! }
  #endif /* __cplusplus */
  #endif
  #endif  /* SCO_STATIC_FUNC_CHECK */
--- 42,48 ----
        return __stat32(__f, __p);
  }
  #if __cplusplus
!  }
  #endif /* __cplusplus */
  #endif
  #endif  /* SCO_STATIC_FUNC_CHECK */
***************
*** 54,61 ****
  
  /* macro to test for symbolic link */
  #define S_ISLNK(mode) (((mode) & S_IFMT) == S_IFLNK)
        fstat(),
! lstat(),
  /* THE INSERTION LINE FAILS ON BSD SYSTEMS */
  #endif  /* ULTRIX_STAT_CHECK */
  
--- 54,62 ----
  
  /* macro to test for symbolic link */
  #define S_ISLNK(mode) (((mode) & S_IFMT) == S_IFLNK)
+ 
        fstat(),
!       lstat(),
  /* THE INSERTION LINE FAILS ON BSD SYSTEMS */
  #endif  /* ULTRIX_STAT_CHECK */
  
unistd.h /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/unistd.h differ: char 637, line 29
*** unistd.h    Sat Nov 26 17:33:58 2005
--- /sw/src/fink.build/gcc4-4.1.0-20051125/gcc-4.1-20051125/fixincludes/tests/base/unistd.h     Wed Nov 23 19:16:51 2005
***************
*** 26,33 ****
  #if defined( ULTRIX_UNISTD_CHECK )
  @(#)unistd.h      6.1     (ULTRIX)
        getgroups(),
! getpagesize(),
        fork(),
! vfork(),
  
  #endif  /* ULTRIX_UNISTD_CHECK */
--- 26,33 ----
  #if defined( ULTRIX_UNISTD_CHECK )
  @(#)unistd.h      6.1     (ULTRIX)
        getgroups(),
!       getpagesize(),
        fork(),
!       vfork(),
  
  #endif  /* ULTRIX_UNISTD_CHECK */

There were fixinclude test FAILURES
make[2]: *** [check] Error 1

Do you see that in your make check on darwin?
             Jack