------- Comment #2 from pinskia at gcc dot gnu dot org 2006-02-21 12:58 -------
Reduced testcase:
MODULE MODULE_CONC
INTEGER, SAVE :: anzKomponenten = 0
END MODULE MODULE_CONC
MODULE MODULE_THERMOCALC
INTERFACE
FUNCTION solveCConvert ( )
USE MODULE_CONC, ONLY: anzKomponenten
REAL :: solveCConvert ( 1 : anzKomponenten )
END FUNCTION solveCConvert
END INTERFACE
END MODULE MODULE_THERMOCALC
SUBROUTINE outDiffKoeff ( )
USE MODULE_CONC
USE MODULE_THERMOCALC
REAL :: buffer_conc ( 1 : anzKomponenten )
buffer_conc = solveCConvert ( ) * 1E2
END SUBROUTINE outDiffKoeff
----
This has nothing to do with assumed write or characters.
--
pinskia at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Keywords| |ice-on-valid-code
Last reconfirmed|0000-00-00 00:00:00 |2006-02-21 12:58:56
date| |
Summary|"CONTAIN"-ed + assumed |ICE with function returning
|character length + "WRITE" -|variable lenght array
|> ICE at trans-decl.c:849? |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=26393
