Dear gfortran-Maintainers,
I'm wondering why there is still a version of gfortran in wheezy which
is known to be buggy as shown in GCC Bugzilla Bug 54881
(http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54881). I can reproduce the
bug reported there in comment #7 (see attachment), compilation fails with
crash.f90:13.22:
call DestroyNode (theNode, lstatus )
1
Error: Actual argument for 'thenode' must be a pointer at (1)
crash.f90:15.22:
call DestroyNode (theNode, lstatus )
1
Error: Actual argument for 'thenode' must be a pointer at (1)
On the Bugzilla-Page some patches are shown. Any plans to implement and
publish a corrected version of gfortran?
Sincerely
Hartmut Kapitza
--
----------------------------------------------------------------
Dr. Hartmut Kapitza Tel.: +49 (0)4152 87-1846
Institut fuer Kuestenforschung Fax.: +49 (0)4152 87-2818
E-mail: hartmut.kapi...@hzg.de
----------------------------------------------------------------
Helmholtz-Zentrum Geesthacht
Zentrum für Material- und Küstenforschung GmbH
Max-Planck-Straße 1 I 21502 Geesthacht I Deutschland/Germany
Geschäftsführer/Board of Management: Prof. Dr. Wolfgang Kaysser, Dipl.-Ing. Michael Ganß
Vorsitzender des Aufsichtsrates/Chairman of the Supervisory Board: MinDirig Wilfried Kraus
Amtsgericht Lübeck HRB 285 GE (Register Court)
Internet: http://www.hzg.de program crash
implicit none
type treeNode
end type
class(treeNode), pointer :: theNode
logical :: lstatus
select type( theNode )
type is (treeNode)
call DestroyNode (theNode, lstatus )
class is (treeNode)
call DestroyNode (theNode, lstatus )
end select
contains
subroutine DestroyNode( theNode, lstatus )
type(treeNode), pointer :: theNode
logical, intent(out) :: lstatus
end subroutine
end