MPICH, IARGC, and GETARG

[Scott Robert Ladd <coyote at coyotegulch dot com>]

I've built MPICH 1.2.6 on my Opteron box. Trying to compile Fortran 90 
programs with gfortran results in the following link errors:

/root/mpich-1.2.6/lib/libmpich.a(farg.o)(.text+0x6): In function 
`mpir_iargc__':
: undefined reference to `f__xargc'
/root/mpich-1.2.6/lib/libmpich.a(farg.o)(.text+0x38): In function 
`mpir_getarg__':
: undefined reference to `getarg_'

The offending part of the library appears to be this short source file 
(presented in its entirety):

      integer function mpir_iargc()

      mpir_iargc = IARGC()
      return
      end
c
      subroutine mpir_getarg( i, s )

      integer       i
      character (LEN=*) s
      external getarg
      call GETARG(i,s)
      return
      end

Being very tired (a death in the family over the weekend), I may be 
missing something here. Apparently, gfortran is treating IARGC and 
GETARG as callable functions instead of intrinsics, at least in the case 
of MPICH. Am I missing something obvious here?

--
Scott Robert Ladd
site: http://www.coyotegulch.com
blog: http://chaoticcoyote.blogspot.com