[Bug fortran/68151] ICE on using select case with function of wrong type

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151

--- Comment #5 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Sun Nov  8 17:43:29 2015
New Revision: 229957

URL: https://gcc.gnu.org/viewcvs?rev=229957=gcc=rev
Log:
2015-11-08  Steven G. Kargl  

PR fortran/68151
* match.c (match_case_selector):  Check for invalid type.

2015-11-08  Steven G. Kargl  

PR fortran/68151
* gfortran.dg/pr68151.f90: New test.

Added:
branches/gcc-5-branch/gcc/testsuite/gfortran.dg/pr68151.f90
Modified:
branches/gcc-5-branch/gcc/fortran/ChangeLog
branches/gcc-5-branch/gcc/fortran/match.c
branches/gcc-5-branch/gcc/testsuite/ChangeLog

[Bug fortran/68151] ICE on using select case with function of wrong type

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151

kargl at gcc dot gnu.org changed:

   What|Removed |Added

 Status|NEW |RESOLVED
 Resolution|--- |FIXED
   Target Milestone|--- |5.3

--- Comment #6 from kargl at gcc dot gnu.org ---
Fixed on trunk and 5-branch.  Thanks for the bug report.

[Bug fortran/68151] ICE on using select case with function of wrong type

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151

--- Comment #4 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Sat Nov  7 20:04:43 2015
New Revision: 229938

URL: https://gcc.gnu.org/viewcvs?rev=229938=gcc=rev
Log:
2015-11-07  Steven G. Kargl  

PR fortran/68151
* match.c (match_case_selector):  Check for invalid type.

2015-11-07  Steven G. Kargl  

PR fortran/68151
* gfortran.dg/pr68151.f90: New test.

Added:
trunk/gcc/testsuite/gfortran.dg/pr68151.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/match.c
trunk/gcc/testsuite/ChangeLog

[Bug fortran/68151] ICE on using select case with function of wrong type

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151

kargl at gcc dot gnu.org changed:

   What|Removed |Added

 CC||kargl at gcc dot gnu.org
   Assignee|unassigned at gcc dot gnu.org  |kargl at gcc dot gnu.org

--- Comment #3 from kargl at gcc dot gnu.org ---
I have a patch.

[Bug fortran/68151] ICE on using select case with function of wrong type

[gerhard.steinmetz.fort...@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151

--- Comment #1 from Gerhard Steinmetz  
---
Or depending on used compiler options :

$ cat z3.f90
program p
   real :: z
   integer :: k = 1
   select case (k)
   case (:huge(z))
   end select
end

$ gfortran -fdefault-real-8 z3.f90
f951: internal compiler error: gfc_trans_select(): Bad type for case expr.

---

Analogous with complex :

$ cat z4.f90
program p
   integer :: k = 1
   select case (k)
   case (cmplx(1):)
   end select
end

$ gfortran -fdefault-real-8 z4.f90
f951: internal compiler error: gfc_trans_select(): Bad type for case expr.

[Bug fortran/68151] ICE on using select case with function of wrong type

[dominiq at lps dot ens.fr]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68151

Dominique d'Humieres  changed:

   What|Removed |Added

 Status|UNCONFIRMED |NEW
   Last reconfirmed||2015-10-29
 Ever confirmed|0   |1

--- Comment #2 from Dominique d'Humieres  ---
Confirmed from 4.8 up to trunk (6.0). I see a change of behavior between
revisions r217961 (2014-11-22)

pr68151.f90:1.9:

program p
 1
Internal Error at (1):
gfc_trans_select(): Bad type for case expr.

and r218255 (2014-12-02)

f951: internal compiler error: gfc_trans_select(): Bad type for case expr.

pr68151.f90:3:0:

select case (k)
 ^
internal compiler error: Abort trap: 6
gfortran: internal compiler error: Abort trap: 6 (program f951)
...