Index: /trunk/psLib/src/Makefile.Globals
===================================================================
--- /trunk/psLib/src/Makefile.Globals	(revision 1522)
+++ /trunk/psLib/src/Makefile.Globals	(revision 1523)
@@ -5,6 +5,6 @@
 ##  Assumptions:    Variable "prefix" already defined
 ##
-##  $Revision: 1.15 $  $Name: not supported by cvs2svn $
-##  $Date: 2004-08-13 00:12:00 $
+##  $Revision: 1.16 $  $Name: not supported by cvs2svn $
+##  $Date: 2004-08-13 00:46:18 $
 ##
 ##  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -42,5 +42,5 @@
 # Set initial value for CFLAGS which will include all OS common flags for GCC
 
-CFLAGS := -O0 -g2 -Wall -Werror -std=c99 -D_GNU_SOURCE -DFORTRAN_UNDERLINE_SUFFIX -pipe
+CFLAGS := -O0 -g2 -Wall -Werror -std=c99 -D_GNU_SOURCE -pipe
 
 ifdef NO_TRACE
Index: /trunk/psLib/src/astronomy/slalib.h
===================================================================
--- /trunk/psLib/src/astronomy/slalib.h	(revision 1522)
+++ /trunk/psLib/src/astronomy/slalib.h	(revision 1523)
@@ -7,6 +7,6 @@
 *  @author Robert DeSonia, MHPCC
 *
-*  @version $Revision: 1.3 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2004-08-13 00:16:03 $
+*  @version $Revision: 1.4 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2004-08-13 00:46:18 $
 *
 *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -16,5 +16,25 @@
 #define SLALIB_H
 
-#ifdef FORTRAN_UNDERLINE_SUFFIX
+#ifdef FORTRAN_DOUBLE_UNDERSCORE_SUFFIX
+#ifdef FORTRAN_UPPERCASE
+#define slaAoppa SLA_AOPPA__
+#define slaAopqk SLA_AOPQK__
+#define slaOapqk SLA_OAPQK__
+#else
+#define slaAoppa sla_aoppa__
+#define slaAopqk sla_aopqk__
+#define slaOapqk sla_oapqk__
+#endif
+#elseif FORTRAN_NO_UNDERSCORE_SUFFIX
+#ifdef FORTRAN_UPPERCASE
+#define slaAoppa SLA_AOPPA
+#define slaAopqk SLA_AOPQK
+#define slaOapqk SLA_OAPQK
+#else
+#define slaAoppa sla_aoppa
+#define slaAopqk sla_aopqk
+#define slaOapqk sla_oapqk
+#endif
+#else
 #ifdef FORTRAN_UPPERCASE
 #define slaAoppa SLA_AOPPA_
@@ -25,14 +45,4 @@
 #define slaAopqk sla_aopqk_
 #define slaOapqk sla_oapqk_
-#endif
-#else
-#ifdef FORTRAN_UPPERCASE
-#define slaAoppa SLA_AOPPA
-#define slaAopqk SLA_AOPQK
-#define slaOapqk SLA_OAPQK
-#else
-#define slaAoppa sla_aoppa
-#define slaAopqk sla_aopqk
-#define slaOapqk sla_oapqk
 #endif
 #endif