[Bug libfortran/33386] Fortran SELECT statement miscompiles

2007-09-11 Thread fxcoudert at gcc dot gnu dot org
--- Comment #7 from fxcoudert at gcc dot gnu dot org 2007-09-11 14:54 --- Fixed. Thanks for the bug report. -- fxcoudert at gcc dot gnu dot org changed: What|Removed |Added --

[Bug libfortran/33386] Fortran SELECT statement miscompiles

2007-09-11 Thread fxcoudert at gcc dot gnu dot org
--- Comment #6 from fxcoudert at gcc dot gnu dot org 2007-09-11 14:53 --- Subject: Bug 33386 Author: fxcoudert Date: Tue Sep 11 14:53:02 2007 New Revision: 128379 URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=128379 Log: PR libfortran/33386 * runtime/select.c (

[Bug libfortran/33386] Fortran SELECT statement miscompiles

2007-09-11 Thread jpr at csc dot fi
--- Comment #5 from jpr at csc dot fi 2007-09-11 12:49 --- Subject: Re: Fortran SELECT statement miscompiles Yes, this seems to do the trick. Thanx, Juha > > > --- Comment #4 from fxcoudert at gcc dot gnu dot org 2007-09-11 10:48 > --- >> Adding a default case gets rid of

[Bug libfortran/33386] Fortran SELECT statement miscompiles

2007-09-11 Thread fxcoudert at gcc dot gnu dot org
--- Comment #4 from fxcoudert at gcc dot gnu dot org 2007-09-11 10:48 --- > Adding a default case gets rid of the problems, also for my real application > code. If you're in a position to build the compiler yourself, could you try the following patch? I think it should fix the problem

[Bug libfortran/33386] Fortran SELECT statement miscompiles

2007-09-11 Thread jpr at csc dot fi
--- Comment #3 from jpr at csc dot fi 2007-09-11 10:42 --- (In reply to comment #1) > I'll work on that, I've re-written CHARACTER SELECT recently. However, I can't > reproduce this on x86_64-linux. Could you run "gfortran -fdump-tree-original > a.f90" and post the a.f90.003t.original fi

[Bug libfortran/33386] Fortran SELECT statement miscompiles

2007-09-11 Thread pinskia at gcc dot gnu dot org
--- Comment #2 from pinskia at gcc dot gnu dot org 2007-09-11 10:38 --- int select_string (select_struct *table, int table_len, const char *selector, int selector_len) { select_struct *t; int i, low, high, mid; int default_jump; The issue is default_jump is used un