http://gcc.gnu.org/bugzilla/show_bug.cgi?id=49074
Summary: Incomplete error message
Product: gcc
Version: 4.7.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassig...@gcc.gnu.org
ReportedBy: jvdeli...@gcc.gnu.org
This test case:
module foo
type bar
integer :: i
contains
generic :: assignment (=) => assgn_bar
procedure, private :: assgn_bar
end type bar
contains
elemental subroutine assgn_bar (a, b)
class (bar), intent (inout) :: a
class (bar), intent (in) :: b
select type (b)
type is (bar)
a%i = b%i
end select
return
end subroutine assgn_bar
end module foo
program main
use foo
type (bar), allocatable :: foobar(:)
allocate (foobar(2))
foobar = [bar(1), bar(2)]
end program
Gives:
gfc init.f90
<During initialization>
Error: Non-scalar base object at (1) currently not implemented
Not a very helpful message if the error is in a large file. Feedback from
h...@gfortran.org
