public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/18561] New: IF (logical ) IF (arith) lab1 , lab 2 lab 3   is unclassifiable
@ 2004-11-19  8:23 paul dot richard dot thomas at cea dot fr
  2004-11-19 15:17 ` [Bug fortran/18561] " pinskia at gcc dot gnu dot org
  0 siblings, 1 reply; 2+ messages in thread
From: paul dot richard dot thomas at cea dot fr @ 2004-11-19  8:23 UTC (permalink / raw)
  To: gcc-bugs

Encountered in LLNL DLSODES.F - execreable stuff, obsolete too, but accepted by 
other brands.  The fix is easy and looks cleaner.

IS THIS A BUG OR AN ABOMINATION?

	program ifif_test
           integer     i , j 
	   i = 1
	   j = 2
           if ( i.EQ.1 ) if ( j -2 ) 10 , 20 , 30
 10	   PRINT *, 'thuuunk! j<2'
           stop 
 20	   print *, 'Hello 1,2 world'
	   STOP
 30       PRINT *, 'uuurkk! j>2'
	end program ifif_test

$ /irun/bin/gfortran -x f77 ifif_test.f90
 In file ifif_test.f90:5

           if ( i.EQ.1 ) if ( j -2 ) 10 , 20 , 30
                        1
Error: Unclassifiable statement in IF-clause at (1)

-- 
           Summary: IF (logical ) IF (arith) lab1 , lab 2 lab 3   is
                    unclassifiable
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: paul dot richard dot thomas at cea dot fr
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18561


^ permalink raw reply	[flat|nested] 2+ messages in thread
* [Bug fortran/18561] IF (logical ) IF (arith) lab1 , lab 2 lab 3   is unclassifiable
  2004-11-19  8:23 [Bug fortran/18561] New: IF (logical ) IF (arith) lab1 , lab 2 lab 3 is unclassifiable paul dot richard dot thomas at cea dot fr
@ 2004-11-19 15:17 ` pinskia at gcc dot gnu dot org
  0 siblings, 0 replies; 2+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-11-19 15:17 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From pinskia at gcc dot gnu dot org  2004-11-19 15:16 -------


*** This bug has been marked as a duplicate of 17229 ***

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|                            |DUPLICATE


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18561


^ permalink raw reply	[flat|nested] 2+ messages in thread
end of thread, other threads:[~2004-11-19 15:17 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-11-19  8:23 [Bug fortran/18561] New: IF (logical ) IF (arith) lab1 , lab 2 lab 3 is unclassifiable paul dot richard dot thomas at cea dot fr
2004-11-19 15:17 ` [Bug fortran/18561] " pinskia at gcc dot gnu dot org

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).