psblas3:

introduced a header file which defines default values for fortran symbols mangling.
it shall be used by each C source file defining symbols intended to be used by fortran.

base/modules/Makefile

@@ -35,8 +35,8 @@ FINCLUDES=$(FMFLAG)$(LIBDIR) $(FMFLAG). $(FIFLAG).
 lib:  penvmod  $(UTIL_MODS)  $(OBJS)  
 	$(AR) $(LIBDIR)/$(LIBNAME) $(MODULES) $(OBJS) $(MPFOBJS)
 	$(RANLIB) $(LIBDIR)/$(LIBNAME)
-	/bin/cp -p $(LIBMOD) $(LIBDIR)
-	/bin/cp -p *$(.mod) $(LIBDIR)
+	/bin/cp -p $(CPUPDFLAG) $(LIBMOD) $(LIBDIR)
+	/bin/cp -p $(CPUPDFLAG) *$(.mod) $(LIBDIR)
 
 
 psi_comm_buffers_mod.o: psb_const_mod.o 

base/modules/cutil.c

@@ -1,6 +1,7 @@
 #include <sys/time.h>
 #include <stdio.h>
 #include <string.h>
+#include "psb_internals.h"
 
 #ifdef LowerUnderscore
 #define psi_c_diffadd   psi_c_diffadd_

base/modules/fakempi.c

@@ -1,21 +1,7 @@
 #include <sys/time.h>
 #include <stdio.h>
 #include <string.h>
-
-#ifndef LowerUnderscore
-#ifndef LowerDoubleUnderscore
-#ifndef LowerCase
-#ifndef UpperUnderscore
-#ifndef UpperDoubleUnderscore 
-#ifndef UpperCase
-#define LowerUnderscore 1  /* 20110404 the default */
-/* #error "should specify a default mangling scheme" */
-#endif
-#endif
-#endif
-#endif
-#endif
-#endif
+#include "psb_internals.h"
 
 
 #ifdef LowerUnderscore

base/modules/psb_internals.h

@@ -0,0 +1,20 @@
+#ifndef PSB_INTERNALS_H
+#define PSB_INTERNALS_H
+
+/* providing a default mangling scheme */
+#ifndef LowerUnderscore
+#ifndef LowerDoubleUnderscore
+#ifndef LowerCase
+#ifndef UpperUnderscore
+#ifndef UpperDoubleUnderscore 
+#ifndef UpperCase
+#define LowerUnderscore 1  /* 20110404 the default */
+/* #error "should specify a default mangling scheme" */
+#endif
+#endif
+#endif
+#endif
+#endif
+#endif
+
+#endif