From: don_schad@my-dejanews.com
Newsgroups: comp.parallel.mpi,comp.lang.fortran
Subject: Re: Portland Group Fortran and MPICH
Date: Fri, 20 Nov 1998 14:45:51 GMT
Organization: Deja News - The Leader in Internet Discussion
Message-Id: <733vap$lec$1@nnrp1.dejanews.com>
References: <3654FE2F.888AB75F@u.washington.edu>
Xref: ukc comp.parallel.mpi:4338 comp.lang.fortran:61506


In article <3654FE2F.888AB75F@u.washington.edu>,
  Blas Pedro Uberuaga <buber@u.washington.edu> wrote:
> I am trying to get MPICH to compile and run on a RedHat 5.0 Pentium II
> machine.  I am compiling with the configuration options 'fc=pgf77'.
> When all is done, the cpi example program works fine, but the fpi
> example cannot spawn more than one process.  It starts up and runs fine,
> but always just one process.  Does anyone have any ideas what might be
> wrong?  I've tried many things, including command line flags suggested


I had a similar problem with the NAGf95 compiler.    The problem in
this case was with the configure script, which set values for F77ARGC
and F77GETARGC macros.  These values were set to 0 and "" , respectively.

When the file mpi/src/env/farg.f.in is processed before compilation,
the above values are inserted in place of the macros, and you end up
with mpir_argc = 0, and a blank line where you should get a call to
getarg.  This means that when MPI_Init returns, it has and argc of 0,
and as a result you only get the master process started.

To see if you have a similar problem, look at the file
mpi/src/env/farg.f, and make sure that it contains calls to
iargc, and getarg (which are compiler-dependent i guess).

Anyway, it should look something like (from NAGf90):

      integer function mpir_iargc()
      use f90_unix_env

      mpir_iargc = iargc()  <<< check for this call

      return
      end
c
      subroutine mpir_getarg( i, s )
      use f90_unix_env
      integer       i
      character*(*) s

      call getarg(i,s)       <<<< and this one

      return

      end


You can monkey w/ the configure script to get this fixed, or
directly edit your farg.f[.in] file to get things setup properly
(if this is your problem).

don

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own