[SCore-users-jp] [SCore-users] GLOBAL ARRAYS

[kameyama at pccluster.org]

In article <200206131631.g5DGVDe23428 at zeralda.streamline.com> Nick Birkett <nrcb at streamline-computing.com> wrotes:
> I applied your patch:
> 
>  tar zxvf global3-2B.tgz
>  patch -p0 < score.patch
> cd g
> export TARGET=LINUX
> make CC='/opt/score/bin/mpicc' FC='/opt/score/bin/mpif77' _CC=/opt/score/bin/
> mpicc _FC=/opt/score/bin/mpif77
> 
> But I still have an underscore error:
> 
> test.o: In function `MAIN__':
> test.o(.text+0x6): undefined reference to `pbeginf_'
> test.o(.text+0x3d7): undefined reference to `pend_'
> collect2: ld returned 1 exit status
> make[2]: *** [test.x] Error 1
> rm util.o ffflush.o test.o
> make[2]: Leaving directory `/users/nrcb/GLOBAL-ARRAYS/g/global/testing'
> make[1]: *** [test.x] Error 1
> make[1]: Leaving directory `/users/nrcb/GLOBAL-ARRAYS/g/global'
> make: *** [test] Error 2
> zeralda:~/GLOBAL-ARRAYS/g$
> 
> I think pbeginf is in the tcgmsg-mpi directory.
> 
> The test program wants to find pbeginf_ but in the library  it is pbeginf__
> 
> I will try to find out why this is.

Sorry, Please apply patch in this mail.
test.F call pbeginf and pend if MPI is not define.
But it shuld call mpi_initialize and mpi_finalize instead.

                       from Kameyama Toyohisa
---------------------------------------cut heere--------------------------------
diff -ru g/global/src/global.fh g.success/global/src/global.fh
--- g/global/src/global.fh      Fri Nov 30 07:43:20 2001
+++ g.success/global/src/global.fh      Fri Jun 14 08:53:03 2002
@@ -52,3 +52,4 @@
       external nga_create_ghosts_irreg,nga_create_ghosts
       external nga_ddot_patch, nga_zdot_patch, nga_idot_patch
       external ga_sdot, ga_sdot_patch, nga_sdot_patch
+#define MPI 1
diff -ru g/global/src/global.h g.success/global/src/global.h
--- g/global/src/global.h       Wed Jan 30 07:27:14 2002
+++ g.success/global/src/global.h       Fri Jun 14 09:02:35 2002
@@ -4,6 +4,7 @@
 #define GLOBAL_H
 
 #include <stdio.h>
+#define MPI 1
 #include "typesf2c.h"
 
 
---------------------------------------cut heere--------------------------------