diff options
author | Dan Albert <danalbert@google.com> | 2015-10-13 16:28:19 -0700 |
---|---|---|
committer | Dan Albert <danalbert@google.com> | 2015-10-13 16:28:19 -0700 |
commit | a8c075f72b231c37823661ba0d7d082a21cd39d9 (patch) | |
tree | 395aa3b848d56037292e50466643453485073018 /gcc-4.8/gcc/testsuite/gfortran.dg/class_array_12.f03 | |
parent | 5aff2e0142aca13849b4e51de503e71d5010efa6 (diff) | |
download | toolchain_gcc-a8c075f72b231c37823661ba0d7d082a21cd39d9.tar.gz toolchain_gcc-a8c075f72b231c37823661ba0d7d082a21cd39d9.tar.bz2 toolchain_gcc-a8c075f72b231c37823661ba0d7d082a21cd39d9.zip |
Remove gcc-4.8.
Change-Id: Iee9c6985c613f58c82e33a91722d371579eb290f
Diffstat (limited to 'gcc-4.8/gcc/testsuite/gfortran.dg/class_array_12.f03')
-rw-r--r-- | gcc-4.8/gcc/testsuite/gfortran.dg/class_array_12.f03 | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/gcc-4.8/gcc/testsuite/gfortran.dg/class_array_12.f03 b/gcc-4.8/gcc/testsuite/gfortran.dg/class_array_12.f03 deleted file mode 100644 index 9873db7b0..000000000 --- a/gcc-4.8/gcc/testsuite/gfortran.dg/class_array_12.f03 +++ /dev/null @@ -1,31 +0,0 @@ -! { dg-do compile } -! -! PR fortran/51754 -! This program was leading to an ICE related to class arrays -! -! Contributed by Andrew Benson <abenson@caltech.edu> - -module test - private - - type :: componentB - end type componentB - - type :: treeNode - class(componentB), allocatable, dimension(:) :: componentB - end type treeNode - -contains - - function BGet(self) - implicit none - class(componentB), pointer :: BGet - class(treeNode), target, intent(in) :: self - select type (self) - class is (treeNode) - BGet => self%componentB(1) - end select - return - end function BGet - -end module test |