diff options
| author | Janus Weil <janus@gcc.gnu.org> | 2013-02-06 20:39:35 +0100 |
|---|---|---|
| committer | Janus Weil <janus@gcc.gnu.org> | 2013-02-06 20:39:35 +0100 |
| commit | c362c6741d4511d76d00b3c7c732838539c11a75 (patch) | |
| tree | 8b0bc4b792df0ef1c7fe0fe416ee86e3b65b1255 /gcc | |
| parent | 8f093ea0b10ca377258edea550f799a45d9a7aa3 (diff) | |
| download | gcc-c362c6741d4511d76d00b3c7c732838539c11a75.zip gcc-c362c6741d4511d76d00b3c7c732838539c11a75.tar.gz gcc-c362c6741d4511d76d00b3c7c732838539c11a75.tar.bz2 | |
re PR fortran/55978 (class_optional_2.f90 -Os fails)
2013-02-06 Janus Weil <janus@gcc.gnu.org>
PR fortran/55978
* runtime/in_pack_generic.c (internal_pack): Return if base_addr is
NULL.
2013-02-06 Janus Weil <janus@gcc.gnu.org>
PR fortran/55978
* gfortran.dg/class_optional_2.f90: Uncomment some cases which work now.
From-SVN: r195814
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/class_optional_2.f90 | 6 |
2 files changed, 8 insertions, 3 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index a2a2bb9..fd5146fa 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2013-02-06 Janus Weil <janus@gcc.gnu.org> + + PR fortran/55978 + * gfortran.dg/class_optional_2.f90: Uncomment some cases which work now. + 2013-02-06 Jakub Jelinek <jakub@redhat.com> PR middle-end/56217 diff --git a/gcc/testsuite/gfortran.dg/class_optional_2.f90 b/gcc/testsuite/gfortran.dg/class_optional_2.f90 index 90b1719..3472eaa 100644 --- a/gcc/testsuite/gfortran.dg/class_optional_2.f90 +++ b/gcc/testsuite/gfortran.dg/class_optional_2.f90 @@ -3,7 +3,7 @@ ! ! PR fortran/50981 ! PR fortran/54618 -! +! PR fortran/55978 implicit none type t @@ -547,7 +547,7 @@ contains ! call s2elem(z5) ! FIXME: Segfault ! call s2elem_t(x) ! FIXME: Conditional jump or move depends on uninitialised value ! call s2elem_t(y) ! FIXME: Conditional jump or move depends on uninitialised value -! call s2elem_t(z) ! FIXME: Conditional jump or move depends on uninitialised value + call s2elem_t(z) ! call s2elem_t(z2) ! FIXME: Segfault ! call s2elem_t(z3) ! FIXME: Segfault ! call s2elem_t(z4) ! FIXME: Segfault @@ -590,7 +590,7 @@ contains ! call s2elem(z5) ! FIXME: Segfault ! call s2elem_t2(x) ! FIXME: Conditional jump or move depends on uninitialised value ! call s2elem_t2(y) ! FIXME: Conditional jump or move depends on uninitialised value -! call s2elem_t2(z) ! FIXME: Conditional jump or move depends on uninitialised value + call s2elem_t2(z) ! call s2elem_t2(z2) ! FIXME: Segfault ! call s2elem_t2(z3) ! FIXME: Segfault ! call s2elem_t2(z4) ! FIXME: Segfault |