PR fortran/55959
* expr.c (gfc_simplify_expr): Branch is not unreachable.
2013-04-13 Janus Weil <janus@gcc.gnu.org>
PR fortran/55959
* gfortran.dg/typebound_proc_29.f03: New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@197943
138bc75d-0d04-0410-961f-
82ee72b054a4
+2013-04-13 Janus Weil <janus@gcc.gnu.org>
+
+ PR fortran/55959
+ * expr.c (gfc_simplify_expr): Branch is not unreachable.
+
2013-04-12 Janus Weil <janus@gcc.gnu.org>
PR fortran/56266
case EXPR_COMPCALL:
case EXPR_PPC:
- gcc_unreachable ();
break;
}
+2013-04-13 Janus Weil <janus@gcc.gnu.org>
+
+ PR fortran/55959
+ * gfortran.dg/typebound_proc_29.f03: New.
+
2013-04-12 Janus Weil <janus@gcc.gnu.org>
PR fortran/56266
--- /dev/null
+! { dg-do compile }
+!
+! PR 55959: [OOP] ICE in in gfc_simplify_expr, at fortran/expr.c:1920
+!
+! Contributed by Tilo Schwarz <tilo@tilo-schwarz.de>
+
+module pdfs
+ type :: pdf
+ contains
+ procedure, nopass :: getx
+ end type
+
+contains
+
+ real function getx()
+ end function
+
+end module
+
+program abstract
+ use pdfs
+ type(pdf) pp
+ print pp%getx() ! { dg-error "must be of type default-kind CHARACTER or of INTEGER" }
+end program
+
+! { dg-final { cleanup-modules "pdfs" } }