[Bug fortran/39489] [4.3 regression] write_atom(): Writing negative integer

2009-07-05 Thread fxcoudert at gcc dot gnu dot org


--- Comment #13 from fxcoudert at gcc dot gnu dot org  2009-07-05 09:07 
---
Works with newer branches (4.4 and 4.5). According to gfortran maintainers
meeting, will not be fixed.


-- 

fxcoudert at gcc dot gnu dot org changed:

   What|Removed |Added

 Status|NEW |RESOLVED
 Resolution||WONTFIX


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



[Bug fortran/39489] [4.3 regression] write_atom(): Writing negative integer

2009-05-12 Thread burnus at gcc dot gnu dot org


--- Comment #12 from burnus at gcc dot gnu dot org  2009-05-12 22:05 ---
Some more data:

==16952== Conditional jump or move depends on uninitialised value(s)
==16952==at 0x4470FC: write_atom (module.c:1339)
==16952==by 0x4472DD: mio_integer (module.c:1450)
==16952==by 0x447DAC: mio_typespec (module.c:1870)
==16952==by 0x449710: mio_symbol (module.c:3048)

That are lines such as:
  mio_integer (&ts->is_c_interop);


-- 


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



[Bug fortran/39489] [4.3 regression] write_atom(): Writing negative integer

2009-04-28 Thread burnus at gcc dot gnu dot org


--- Comment #11 from burnus at gcc dot gnu dot org  2009-04-28 11:46 ---
I cannot reproduce this with 4.3.4 20090428 [gcc-4_3-branch revision 138185],
however, valgrind shows

Conditional jump or move depends on uninitialised value(s)
  at 0x446764: (within
/gcc-4.3/libexec/gcc/x86_64-unknown-linux-gnu/4.3.4/f951)
  by 0x4486FD: (within
/gcc-4.3/libexec/gcc/x86_64-unknown-linux-gnu/4.3.4/f951)

for MpkBase.f95 and MpkData.f95 and no such warning for MpkCommon.f95. In order
to pinpoint that problem, I need to build 4.3 with -g ...

 * * *

Nuno Pinhão, you could consider updating to 4.4.0 instead which does not have
this problem and was recently released. (The 4.5 developer branch also works
fine.)


-- 

burnus at gcc dot gnu dot org changed:

   What|Removed |Added

 CC||burnus at gcc dot gnu dot
   ||org


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



[Bug fortran/39489] [4.3 regression] write_atom(): Writing negative integer

2009-04-22 Thread rguenth at gcc dot gnu dot org


--- Comment #10 from rguenth at gcc dot gnu dot org  2009-04-22 13:26 
---
Fortran.  P4.


-- 

rguenth at gcc dot gnu dot org changed:

   What|Removed |Added

   Priority|P3  |P4


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



[Bug fortran/39489] [4.3 regression] write_atom(): Writing negative integer

2009-03-31 Thread jsm28 at gcc dot gnu dot org


-- 

jsm28 at gcc dot gnu dot org changed:

   What|Removed |Added

Summary|[4.3 only, regression]  |[4.3 regression]
   |write_atom(): Writing   |write_atom(): Writing
   |negative integer|negative integer
   Target Milestone|--- |4.3.4


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



[Bug fortran/39489] [4.3 Regression] write_atom(): Writing negative integer

2009-03-19 Thread n dot pinhao at netvisao dot pt


--- Comment #9 from n dot pinhao at netvisao dot pt  2009-03-19 08:24 
---
Created an attachment (id=17492)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=17492&action=view)
Streamlined module files reproducing the error (2)

A file was missing on this test.


-- 


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



[Bug fortran/39489] [4.3 Regression] write_atom(): Writing negative integer

2009-03-18 Thread n dot pinhao at netvisao dot pt


--- Comment #8 from n dot pinhao at netvisao dot pt  2009-03-18 17:48 
---
The code compiles with gfortran 4.2 without problems.


-- 

n dot pinhao at netvisao dot pt changed:

   What|Removed |Added

 CC||n dot pinhao at netvisao dot
   ||pt


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



[Bug fortran/39489] [4.3 Regression] write_atom(): Writing negative integer

2009-03-18 Thread n dot pinhao at netvisao dot pt


--- Comment #7 from n dot pinhao at netvisao dot pt  2009-03-18 17:44 
---
Created an attachment (id=17489)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=17489&action=view)
Streamlined module files reproducing the error (2)

Test files with a corrected version of MpkData.f95.
With gfortran 4.3.2 in i486 both MpkCommon.f95 and MpkBase.f95 files compile
without errors but the instruction "gfortran -c MpkData.f95" produces the
following error message:
Fatal Error: Reading module pkbase at line 22 column 20: Integer overflow


-- 

n dot pinhao at netvisao dot pt changed:

   What|Removed |Added

  Attachment #17488|0   |1
is obsolete||


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



[Bug fortran/39489] [4.3 Regression] write_atom(): Writing negative integer

2009-03-18 Thread dfranke at gcc dot gnu dot org


--- Comment #6 from dfranke at gcc dot gnu dot org  2009-03-18 16:35 ---
With 4.3.4 (20090318) I get:

$> gfortran-4.3 -o test MpkCommon.f95 MpkBase.f95 MpkData.f95 teste.f95
MpkBase.f95:831.17:

END MODULE pkBase
 1
Internal Error at (1):
write_atom(): Writing negative integer
Fatal Error: Reading module pkbase at line 358 column 47: Expected integer
Fatal Error: Reading module pkbase at line 358 column 47: Expected integer


but 4.2 (20090203) and 4.4 (20090317, to be released soonish) give:
$> gfortran-svn -o test MpkCommon.f95 MpkBase.f95 MpkData.f95 teste.f95
MpkData.f95:598.70:

IF( p_energy%value == 0 ) p_energy%value = Species(j)%p_energy
  1
Error: 'p_energy' at (1) is not a member of the 'particle' structure
MpkData.f95:680.60:

initial_conc%value, mpolar, data_file, gains, losses )
1
Error: Too many components in structure constructor at (1)!
MpkData.f95:735.34:

  ELSE IF (Species(i)%constant) THEN
  1
Error: 'constant' at (1) is not a member of the 'particle' structure
MpkData.f95:739.33:

  ELSE IF( Species(i)%cascade ) THEN
 1
Error: 'cascade' at (1) is not a member of the 'particle' structure
MpkData.f95:774.29:

  IF (Species(i)%constant) THEN
 1
Error: 'constant' at (1) is not a member of the 'particle' structure
MpkData.f95:777.36:

Species(i)%name /= 'e') THEN
1
Error: Unexpected ELSE IF statement at (1)
MpkData.f95:783.43:

  ELSE IF( Species(i)%name == 'e') THEN
   1
Error: Unexpected ELSE IF statement at (1)
MpkData.f95:785.58:

  ELSE IF( INDEX(Species(i)%name, 'photon') /= 0) THEN
  1
Error: Unexpected ELSE IF statement at (1)
MpkData.f95:787.33:

  ELSE IF( Species(i)%cascade) THEN
 1
Error: 'cascade' at (1) is not a member of the 'particle' structure
MpkData.f95:790.65:

( Species(i)%v == -1 .and. Species(i)%energy > 0 ) ) THEN
 1
Error: Unexpected ELSE IF statement at (1)
MpkData.f95:792.47:

  ELSE  ! .not. Species(i)%constant
   1
Error: Unexpected ELSE statement at (1)
MpkData.f95:794.9:

  END IF
 1
Error: Expecting END DO statement at (1)
MpkData.f95:2061.55:

  mask=Kreac(i)%Nreactants(:)>0) )%p_energy ) &
   1
Error: 'p_energy' at (1) is not a member of the 'particle' structure
MpkData.f95:2091.54:

  mask=Kreac(i)%Nproducts(:)>0) )%p_energy ) + &
  1
Error: 'p_energy' at (1) is not a member of the 'particle' structure
MpkData.f95:2112.51:

mask=Kreac(i)%Nproducts(:)>0))%p_energy ) + &
   1
Error: 'p_energy' at (1) is not a member of the 'particle' structure
MpkData.f95:2394.75:

  Index = i; name = Species(i)%name; constant = Species(i)%constant
   1
Error: 'constant' at (1) is not a member of the 'particle' structure
MpkData.f95:2395.38:

  cascade = Species(i)%cascade; charge = Species(i)%charge
  1
Error: 'cascade' at (1) is not a member of the 'particle' structure
MpkData.f95:2397.40:

  p_energy = Species(i)%p_energy; energy = Species(i)%energy
1
Error: 'p_energy' at (1) is not a member of the 'particle' structure
MpkData.f95:93.30:

call pkReadData( UI, FMT, IOError(3) )
  1
Warning: Actual argument contains too few elements for dummy argument 'iostat'
(1/3) at (1)
MpkData.f95:95.32:

call pkReadData( UI, iostat=IOError(3) )
1
Warning: Actual argument contains too few elements for dummy argument 'iostat'
(1/3) at (1)


As the error does not occur in trunk, I believe it is unlikely that it will be
fixed in the branch.


-- 

dfranke at gcc dot gnu dot org changed:

   What|Removed |Added

 Status|WAITING |NEW
 Ever Confirmed|0   |1
  Known to fail||4.3.4
  Known to work||4.2.5 4.4.0
   Last reconfirmed|-00-00 00:00:00 |2009-03-18 16:35:20
   date||
Summary|Error in module with|[4.3 Regression]
   |gfortran 4.3 in 32 bit  |write_atom(): Writin