Internal compiler error (gfortran)

[Richard Haney]

Please help,

I am building a program using gfortran that call mpi functions (LAM/MPI 
version 7.0.4) on a IBM xSeries Linux Cluster (Red Hat 9.0 AS OS) and am 
getting an internal compiler error (I am using gfortran version 4.0.0 
20041001). When I looked at the line in the file throwing the error it is 
accessing the mpi_comm_size function.

Has anyone run into this kind of problem before and if so what did you do to 
solve? Any help/hints would be great.

The compiler output is copied below:
gfortran -c -O3 -m32 -I/usr/local/mpich/include -xf95-cpp-input -ffree-form 
-ffixed-line-length-132 -d8 -DPARALLEL -DPERFTEST -DIRIX32 -g driver.F
cc1: warning: command line option "-ffree-form" is valid for F95 but not for 
C
unhandled expression in get_expr_operands():
<const_decl 0x401d19f8
    type <integer_type 0x4018b488 int4 asm_written public SI
        size <integer_cst 0x40188408 constant invariant 32>
        unit size <integer_cst 0x40188138 constant invariant 4>
        align 32 symtab 1075376752 alias set 4 precision 32 min <integer_cst 
0x401883d8 -2147483648> max <integer_cst 0x401883f0 2147483647>
        pointer_to_this <pointer_type 0x40198000> reference_to_this 
<reference_type 0x401cc910>>
    addressable VOID file driver.F line 1157
    align 1 context <function_decl 0x401c73a0 start_mpi> initial 
<integer_cst 0x40188960 0>>

driver.F: In function 'MAIN__':
driver.F:161: internal compiler error: internal error
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

Thanks in advance for any help.