********>Bugfix.38:
Author: Bob Duke
Date: 02/28/2005

Programs: pmemd

Description: Some compilers (like pathscale and g95) add a second underscore
             to routines that already have an underscore in their name.
             This adds a fix for that for pmemd.

Fix:  apply the following patch to amber8/src/pmemd/src/pmemd_clib.c

------------------------------------------------------------------------------
*** pmemd_clib.c	2004/02/12 13:21:38	1.2
--- pmemd_clib.c	2005/02/28 22:58:09
***************
*** 9,17 ****
--- 9,22 ----
  #ifdef NO_C_UNDERSCORE
  get_bytesize(void * start, void * end, int * bytes)
  #else
+ /* DBL_C_UNDERSCORE for pathscale */
+ #ifdef DBL_C_UNDERSCORE
+ get_bytesize__(void * start, void * end, int * bytes)
+ #else
  get_bytesize_(void * start, void * end, int * bytes)
  #endif
  #endif
+ #endif
  {
    *bytes = ((char *)end - (char *)start);
  }
***************
*** 24,30 ****
--- 29,40 ----
  #ifdef NO_C_UNDERSCORE
  get_wall_time(int * sec, int * usec)
  #else
+ /* DBL_C_UNDERSCORE for pathscale */
+ #ifdef DBL_C_UNDERSCORE
+ get_wall_time__(int * sec, int * usec)
+ #else
  get_wall_time_(int * sec, int * usec)
+ #endif
  #endif
  #endif
  {
  
------------------------------------------------------------------------------

Workarounds: None