Index: Linker.c
===================================================================
RCS file: /home/cvs/root/fptools/ghc/rts/Linker.c,v
retrieving revision 1.97.2.3
diff -c -r1.97.2.3 Linker.c
*** Linker.c	13 Oct 2002 17:50:54 -0000	1.97.2.3
--- Linker.c	25 Apr 2003 12:05:16 -0000
***************
*** 1,5 ****
  /* -----------------------------------------------------------------------------
!  * $Id: Linker.c,v 1.97.2.3 2002/10/13 17:50:54 wolfgang Exp $
   *
   * (c) The GHC Team, 2000, 2001
   *
--- 1,5 ----
  /* -----------------------------------------------------------------------------
!  * $Id: Linker.c,v 1.97.2.4 2003/04/11 12:41:13 simonmar Exp $
   *
   * (c) The GHC Team, 2000, 2001
   *
***************
*** 196,206 ****
        SymX(uname)                               \
        SymX(unlink)                              \
        SymX(utime)                               \
!       SymX(waitpid)                             \
!       Sym(__divdi3)                             \
!       Sym(__udivdi3)                            \
!       Sym(__moddi3)                             \
!       Sym(__umoddi3)
  
  #elif !defined(mingw32_TARGET_OS)
  #define RTS_MINGW_ONLY_SYMBOLS /**/
--- 196,202 ----
        SymX(uname)                               \
        SymX(unlink)                              \
        SymX(utime)                               \
!       SymX(waitpid)
  
  #elif !defined(mingw32_TARGET_OS)
  #define RTS_MINGW_ONLY_SYMBOLS /**/
***************
*** 271,281 ****
        Sym(opendir)                              \
        Sym(readdir)                              \
        Sym(rewinddir)                            \
!       Sym(closedir)                             \
!       Sym(__divdi3)                             \
!       Sym(__udivdi3)                            \
!       Sym(__moddi3)                             \
!       Sym(__umoddi3)
  #endif
  
  #ifndef SMP
--- 267,273 ----
        Sym(opendir)                              \
        Sym(readdir)                              \
        Sym(rewinddir)                            \
!       Sym(closedir)
  #endif
  
  #ifndef SMP
***************
*** 498,517 ****
  #define RTS_LONG_LONG_SYMS /* nothing */
  #endif
  
! #ifdef ia64_TARGET_ARCH
! /* force these symbols to be present */
! #define RTS_EXTRA_SYMBOLS			\
!       Sym(__divsf3)
! #elif defined(powerpc_TARGET_ARCH)
! #define RTS_EXTRA_SYMBOLS                	\
        Sym(__divdi3)                             \
        Sym(__udivdi3)                            \
        Sym(__moddi3)                             \
        Sym(__umoddi3)				\
        Sym(__ashldi3)				\
        Sym(__ashrdi3)				\
!       Sym(__lshrdi3)				\
!       SymX(__eprintf)
  #else
  #define RTS_EXTRA_SYMBOLS /* nothing */
  #endif
--- 490,520 ----
  #define RTS_LONG_LONG_SYMS /* nothing */
  #endif
  
! // 64-bit support functions in libgcc.a
! #if defined(__GNUC__) && SIZEOF_VOID_P <= 4
! #define RTS_LIBGCC_SYMBOLS			\
        Sym(__divdi3)                             \
        Sym(__udivdi3)                            \
        Sym(__moddi3)                             \
        Sym(__umoddi3)				\
        Sym(__ashldi3)				\
        Sym(__ashrdi3)				\
!       Sym(__lshrdi3)
! #else
! #define RTS_LIBGCC_SYMBOLS
! #endif
! 
! #ifdef ia64_TARGET_ARCH
! /* force these symbols to be present */
! #define RTS_EXTRA_SYMBOLS			\
!       Sym(__divsf3)
! #elif defined(powerpc_TARGET_ARCH)
!       // Symbols that don't have a leading underscore
!       // on Mac OS X. They have to receive special treatment,
!       // see machoInitSymbolsWithoutUnderscore()
! #define RTS_MACHO_NOUNDERLINE_SYMBOLS		\
!       Sym(saveFP)				\
!       Sym(restFP)
  #else
  #define RTS_EXTRA_SYMBOLS /* nothing */
  #endif
***************
*** 525,530 ****
--- 528,534 ----
  RTS_POSIX_ONLY_SYMBOLS
  RTS_MINGW_ONLY_SYMBOLS
  RTS_CYGWIN_ONLY_SYMBOLS
+ RTS_LIBGCC_SYMBOLS
  #undef Sym
  #undef SymX
  
***************
*** 545,550 ****
--- 549,555 ----
        RTS_POSIX_ONLY_SYMBOLS
        RTS_MINGW_ONLY_SYMBOLS
        RTS_CYGWIN_ONLY_SYMBOLS
+       RTS_LIBGCC_SYMBOLS
        { 0, 0 } /* sentinel */
  };