public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/23654] New: internal compiler error: in gfc_conv_function_call
@ 2005-08-31 14:29 kloedej at knmi dot nl
2005-08-31 15:15 ` [Bug fortran/23654] " pinskia at gcc dot gnu dot org
0 siblings, 1 reply; 2+ messages in thread
From: kloedej at knmi dot nl @ 2005-08-31 14:29 UTC (permalink / raw)
To: gcc-bugs
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 1662 bytes --]
The following i.m.o. correct code lets gfortran crash:
module problem
implicit none
contains
!---
subroutine compare_words
character(len=1), dimension(:), pointer :: word1
allocate(word1(5))
word1(1:5) = (/ '1','2','3','4','5' /)
call print_word(chararray2string(word1))
deallocate(word1)
end subroutine compare_words
!---
subroutine print_word(word1)
character(len=*), intent(in) :: word1 ! input
print *,"word1 = ",word1
end subroutine print_word
!---
function chararray2string(chararray) result(text)
! #[
character(len=1), dimension(:) :: chararray ! input
character(len=size(chararray)) :: text ! output
text = transfer(chararray,text)
end function chararray2string
!---
end module problem
program testproblem
USE problem, only: compare_words
call compare_words
end program Testproblem
The compiler responds as follows:
>gfortran -o problem problem.F90
problem.F90: In function compare_words:
problem.F90:8: internal compiler error: in gfc_conv_function_call, at
fortran/trans-expr.c:1107
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
>
--
Summary: internal compiler error: in gfc_conv_function_call
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: kloedej at knmi dot nl
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23654
^ permalink raw reply [flat|nested] 2+ messages in thread
* [Bug fortran/23654] internal compiler error: in gfc_conv_function_call
2005-08-31 14:29 [Bug fortran/23654] New: internal compiler error: in gfc_conv_function_call kloedej at knmi dot nl
@ 2005-08-31 15:15 ` pinskia at gcc dot gnu dot org
0 siblings, 0 replies; 2+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-08-31 15:15 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From pinskia at gcc dot gnu dot org 2005-08-31 15:15 -------
Reduced testcase:
module problem
contains
subroutine compare_words
character(len=1), dimension(:), pointer :: word1
call print_word(chararray2string(word1))
end subroutine compare_words
subroutine print_word(word1)
character(len=*), intent(in) :: word1 ! input
end subroutine print_word
function chararray2string(chararray) result(text)
character(len=1), dimension(:) :: chararray ! input
character(len=size(chararray)) :: text ! output
end function chararray2string
end module problem
Which means this is a dup of bug 15326.
*** This bug has been marked as a duplicate of 15326 ***
--
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |RESOLVED
Resolution| |DUPLICATE
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23654
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2005-08-31 15:15 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2005-08-31 14:29 [Bug fortran/23654] New: internal compiler error: in gfc_conv_function_call kloedej at knmi dot nl
2005-08-31 15:15 ` [Bug fortran/23654] " pinskia at gcc dot gnu dot org
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).