[Bug fortran/39489] Error in module with gfortran 4.3 in 32 bit processors.

["dominiq at lps dot ens dot fr" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #5 from dominiq at lps dot ens dot fr  2009-03-18 15:44 -------
On powerpc-apple-darwin9 with gfortran 4.3.3 (with or without -m64) I get:

[karma] Downloads/gftest% gfortran -c MpkBase.f95
MpkBase.f95:831.17:

END MODULE pkBase
                 1
Internal Error at (1):
gfc_code2string(): Bad code

MpkBase.f95 compiles with gfortran from trunk. However I got many errors with
MpkData.f95:

MpkData.f95:598.70:

        IF( p_energy%value == 0 ) p_energy%value = Species(j)%p_energy
                                                                      1
Error: 'p_energy' at (1) is not a member of the 'particle' structure
MpkData.f95:680.60:

        initial_conc%value, mpolar, data_file, gains, losses )
                                                            1
Error: Too many components in structure constructor at (1)!
...
MpkData.f95:93.30:

    call pkReadData( UI, FMT, IOError(3) )
                              1
Warning: Actual argument contains too few elements for dummy argument 'iostat'
(1/3) at (1)
MpkData.f95:95.32:

    call pkReadData( UI, iostat=IOError(3) )
                                1
Warning: Actual argument contains too few elements for dummy argument 'iostat'
(1/3) at (1)

Too many errors to have chance to fix them right now.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=39489