--- Comment #12 from pault at gcc dot gnu dot org 2006-06-25 18:11 ---
Fixed on trunk and 4.1
Paul
--
pault at gcc dot gnu dot org changed:
What|Removed |Added
--- Comment #11 from pault at gcc dot gnu dot org 2006-06-25 18:08 ---
Subject: Bug 25073
Author: pault
Date: Sun Jun 25 18:08:13 2006
New Revision: 114994
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=114994
Log:
2006-06-25 Paul Thomas <[EMAIL PROTECTED]>
PR fortran
--- Comment #10 from pault at gcc dot gnu dot org 2006-06-25 15:11 ---
Subject: Bug 25073
Author: pault
Date: Sun Jun 25 15:11:02 2006
New Revision: 114987
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=114987
Log:
2006-06-25 Paul Thomas <[EMAIL PROTECTED]>
PR fortran
--- Comment #9 from paul dot richard dot thomas at cea dot fr 2006-06-22
14:31 ---
> A straightforward fix in resolve.c (resolve_select).
In checking the attachment, I have just seen that the if condition can be
simplified to
if (cp->low->value.logical & seen_logical)
--- Comment #8 from paul dot richard dot thomas at cea dot fr 2006-06-22
14:25 ---
Created an attachment (id=11728)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=11728&action=view)
A patch to fix the PR.
A straightforward fix in resolve.c (resolve_select).
Paul
--
http://gc
--- Comment #7 from tkoenig at gcc dot gnu dot org 2006-05-31 21:10 ---
This is a real bug, and not an issue of a missing
test case.
--
tkoenig at gcc dot gnu dot org changed:
What|Removed |Added
--- Comment #3 from tkoenig at gcc dot gnu dot org 2006-04-17 19:38 ---
This is now fixed on mainline and 4.1:
$ cat case.f90
program main
logical :: l
select case (l)
case (.true.)
case (.true.)
end select
end program main
$ gfortran case.f90
In file case.f90:4
case (.tru
--- Comment #2 from pinskia at gcc dot gnu dot org 2006-02-26 19:49 ---
We do get a warning:
In file t.f90:2
SELECT CASE(L)
1
Warning: Logical SELECT CASE block at (1) has more that two cases
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25073
--- Comment #1 from fxcoudert at gcc dot gnu dot org 2005-11-26 19:54
---
gfortran doesn't detect that the CASEs overlap.
## g95 ##
In file foo.f90:3
CASE(.true.)
1
In file foo.f90:5
CASE(.true.)
2
Error: CASEs at (1) and (2) overlap
## Intel ##
fortcom: Error: foo.f90, lin
