This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/19927] New: Function call with character*(*) arg is broken
- From: "sgk at troutmask dot apl dot washington dot edu" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 12 Feb 2005 16:28:40 -0000
- Subject: [Bug fortran/19927] New: Function call with character*(*) arg is broken
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
>From Richard Maine, editor of the F2003 standard
module fdas_command
contains
function lower_case (string) result(result)
character*(*), intent(in) :: string
character*(len(string)) :: result
result = string
return
end function lower_case
subroutine ask_help (topic)
character*(*), intent(in) :: topic
character :: topic_tmp*16
topic_tmp = lower_case(topic)
return
end subroutine ask_help
end module fdas_command
bug3.f90: In function 'ask_help':
bug3.f90:3: internal compiler error: in gfc_conv_function_call, at
fortran/trans-expr.c:1104
This may be related to one of the other CHARACTER*(*) bugs, but I haven't
found it.
--
Summary: Function call with character*(*) arg is broken
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: sgk at troutmask dot apl dot washington dot edu
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19927