public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE
@ 2004-08-18  9:03 c dot lemmen at fz-juelich dot de
  2004-08-18  9:18 ` [Bug fortran/17074] " reichelt at gcc dot gnu dot org
                   ` (4 more replies)
  0 siblings, 5 replies; 6+ messages in thread
From: c dot lemmen at fz-juelich dot de @ 2004-08-18  9:03 UTC (permalink / raw)
  To: gcc-bugs

> gfortran -v testcase_simpleifwhere.f90 

 In file testcase_simpleifwhere.f90:12

  if (2>1) where(index) values=-1.
          1
Error: Unclassifiable statement in IF-clause at (1)

*****************************
Configuration:

Configured with: ./configure --enable-threads=posix --disable-checking
--enable-libgcj --with-system-zlib --enable-shared --enable-__cxa_atexit
i686-suse-linux  --enable-languages=c,f95 --no-create --no-recursion
Thread model: posix
gcc version 3.5.0 20040818 (experimental)
GNU F95 version 3.5.0 20040818 (experimental) (i686-suse-linux)
        compiled by GNU C version 3.5.0 20040817 (experimental).
!**************************
!Test case code:

program testcase_simpleifwhere
  
  real,dimension(100)    :: values
  logical,dimension(100) :: index

  index(:)=.true.
    
  ! The following line works
  where(index) values=-1.

  ! Next line is broken
  if (2>1) where(index) values=-1.
  
end program testcase_simpleifwhere

!**********************************

This code works with nag/intel/pgf compilers

-- 
           Summary: Unclassifiable statement in IF-clause / Simple IF
                    followed by WHERE
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: c dot lemmen at fz-juelich dot de
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i686-suse-linux
  GCC host triplet: i686-suse-linux
GCC target triplet: i686-suse-linux


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/17074] Unclassifiable statement in IF-clause / Simple IF followed by WHERE
  2004-08-18  9:03 [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE c dot lemmen at fz-juelich dot de
@ 2004-08-18  9:18 ` reichelt at gcc dot gnu dot org
  2004-08-18  9:37 ` c dot lemmen at fz-juelich dot de
                   ` (3 subsequent siblings)
  4 siblings, 0 replies; 6+ messages in thread
From: reichelt at gcc dot gnu dot org @ 2004-08-18  9:18 UTC (permalink / raw)
  To: gcc-bugs



-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |reichelt at gcc dot gnu dot
                   |                            |org
             Status|UNCONFIRMED                 |NEW
          Component|libfortran                  |fortran
     Ever Confirmed|                            |1
  GCC build triplet|i686-suse-linux             |
   GCC host triplet|i686-suse-linux             |
 GCC target triplet|i686-suse-linux             |
           Keywords|                            |monitored, rejects-valid
   Last reconfirmed|0000-00-00 00:00:00         |2004-08-18 09:18:26
               date|                            |


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/17074] Unclassifiable statement in IF-clause / Simple IF followed by WHERE
  2004-08-18  9:03 [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE c dot lemmen at fz-juelich dot de
  2004-08-18  9:18 ` [Bug fortran/17074] " reichelt at gcc dot gnu dot org
@ 2004-08-18  9:37 ` c dot lemmen at fz-juelich dot de
  2004-08-19 15:20 ` tobi at gcc dot gnu dot org
                   ` (2 subsequent siblings)
  4 siblings, 0 replies; 6+ messages in thread
From: c dot lemmen at fz-juelich dot de @ 2004-08-18  9:37 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From c dot lemmen at fz-juelich dot de  2004-08-18 09:37 -------
Workaround:  use block if as in

if (2>1) then
  where where(index) values=-1.
endif

-- 


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/17074] Unclassifiable statement in IF-clause / Simple IF followed by WHERE
  2004-08-18  9:03 [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE c dot lemmen at fz-juelich dot de
  2004-08-18  9:18 ` [Bug fortran/17074] " reichelt at gcc dot gnu dot org
  2004-08-18  9:37 ` c dot lemmen at fz-juelich dot de
@ 2004-08-19 15:20 ` tobi at gcc dot gnu dot org
  2004-08-19 22:35 ` cvs-commit at gcc dot gnu dot org
  2004-08-19 23:30 ` pinskia at gcc dot gnu dot org
  4 siblings, 0 replies; 6+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-08-19 15:20 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From tobi at gcc dot gnu dot org  2004-08-19 15:20 -------
Patch here: http://gcc.gnu.org/ml/fortran/2004-08/msg00123.html

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |patch


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/17074] Unclassifiable statement in IF-clause / Simple IF followed by WHERE
  2004-08-18  9:03 [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE c dot lemmen at fz-juelich dot de
                   ` (2 preceding siblings ...)
  2004-08-19 15:20 ` tobi at gcc dot gnu dot org
@ 2004-08-19 22:35 ` cvs-commit at gcc dot gnu dot org
  2004-08-19 23:30 ` pinskia at gcc dot gnu dot org
  4 siblings, 0 replies; 6+ messages in thread
From: cvs-commit at gcc dot gnu dot org @ 2004-08-19 22:35 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From cvs-commit at gcc dot gnu dot org  2004-08-19 22:35 -------
Subject: Bug 17074

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	tobi@gcc.gnu.org	2004-08-19 22:35:47

Modified files:
	gcc/fortran    : ChangeLog match.c 
	gcc/testsuite  : ChangeLog 
Added files:
	gcc/testsuite/gfortran.dg: simpleif_1.f90 

Log message:
	fortran/
	PR fortran/17074
	* match.c (match_simple_forall, match_simple_where): Forward-declare.
	(gfc_match_if): Order statement list alphabetically, add WHERE and
	ew functions.
	(gfc_match_forall): Use match_forall_header.
	
	testsuite/
	PR fortran/17074
	* gfortran.dg/simpleif_1.f90: New test.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.157&r2=1.158
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/match.c.diff?cvsroot=gcc&r1=1.19&r2=1.20
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.4163&r2=1.4164
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/simpleif_1.f90.diff?cvsroot=gcc&r1=NONE&r2=1.1



-- 


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

* [Bug fortran/17074] Unclassifiable statement in IF-clause / Simple IF followed by WHERE
  2004-08-18  9:03 [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE c dot lemmen at fz-juelich dot de
                   ` (3 preceding siblings ...)
  2004-08-19 22:35 ` cvs-commit at gcc dot gnu dot org
@ 2004-08-19 23:30 ` pinskia at gcc dot gnu dot org
  4 siblings, 0 replies; 6+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-08-19 23:30 UTC (permalink / raw)
  To: gcc-bugs


------- Additional Comments From pinskia at gcc dot gnu dot org  2004-08-19 23:30 -------
Fixed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |FIXED
   Target Milestone|---                         |3.5.0


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


^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2004-08-19 23:30 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-08-18  9:03 [Bug libfortran/17074] New: Unclassifiable statement in IF-clause / Simple IF followed by WHERE c dot lemmen at fz-juelich dot de
2004-08-18  9:18 ` [Bug fortran/17074] " reichelt at gcc dot gnu dot org
2004-08-18  9:37 ` c dot lemmen at fz-juelich dot de
2004-08-19 15:20 ` tobi at gcc dot gnu dot org
2004-08-19 22:35 ` cvs-commit at gcc dot gnu dot org
2004-08-19 23:30 ` 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).