diff options
| author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2007-05-24 09:56:50 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2007-05-24 09:56:50 +0000 |
| commit | 4f5497a9245ac73f32f4d202e3b7497c61e79925 (patch) | |
| tree | 50914867a1d89b915c94e3127c4f68f5d0904427 /gcc | |
| parent | 1505f3b58e776fb2865ae9b41d492f3d6b5504a7 (diff) | |
| download | gcc-4f5497a9245ac73f32f4d202e3b7497c61e79925.zip gcc-4f5497a9245ac73f32f4d202e3b7497c61e79925.tar.gz gcc-4f5497a9245ac73f32f4d202e3b7497c61e79925.tar.bz2 | |
re PR testsuite/32038 (gfortran.dg/pr25603.f is invalid code)
PR fortran/32038
* gfortran.dg/pr25603.f: Initialize integer variables.
From-SVN: r125019
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/pr25603.f | 42 |
2 files changed, 47 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 8abebbe..ace4456 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-05-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> + + PR fortran/32038 + * gfortran.dg/pr25603.f: Initialize integer variables. + 2007-05-23 Ian Lance Taylor <iant@google.com> * g++.dg/other/vrp1.C: New test. diff --git a/gcc/testsuite/gfortran.dg/pr25603.f b/gcc/testsuite/gfortran.dg/pr25603.f index a818d5d..fbcbdf5 100644 --- a/gcc/testsuite/gfortran.dg/pr25603.f +++ b/gcc/testsuite/gfortran.dg/pr25603.f @@ -44,6 +44,48 @@ C call abort endif + LHELPA = 1 + LHELP = 1 + LCN = 1 + LBN = 1 + LAN = 1 + LDCDY = 1 + LDCDX = 1 + LKM = 1 + LTM = 1 + LVG = 1 + LUG = 1 + LVM = 1 + LUM = 1 + LHVAR = 1 + LZET = 1 + LDEP = 1 + LVDEP = 1 + LTSTR = 1 + LUSTR = 1 + LOBUK = 1 + LTAVR = 1 + LSTEPH = 1 + LHMIX = 1 + LZ0 = 1 + LELEVY = 1 + LELEVX = 1 + LELEV = 1 + LDKZH = 1 + LDKZM = 1 + LQ = 1 + LPSTEP = 1 + LPI = 1 + LWZ = 1 + LVSTEP = 1 + LVY = 1 + LUSTEP = 1 + LUX = 1 + LTSTEP = 1 + LPOT = 1 + LCSTEP = 1 + LC = 1 + CALL BAR2(NX,NY,NZ,NT,NTIME,NWINDX,NWINDY,NSINKS,NFILT,XSTART, * YSTART,ZSTART,TSTART,DELTAX,DELTAY,DELTAZ,DELTAT,PHI,DL, * DX,DY,DZ,IB,IK,ITY,NCOUNT,NPRINT,NGRAPH,NPSTEP,NGSTEP,LAST, |