[Bug libfortran/50105] Possibly: [4.3/4.4/4.5/4.6/4.7 Regression] I/O with g6.5 - wrong number of "**" shown

2011-08-17 Thread thenlich at users dot sourceforge.net 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50105

--- Comment #3 from Thomas Henlich  
2011-08-17 07:36:54 UTC ---
Maybe we can trace back the change in GFortran between 4.1 and 4.3 and find out
why it was changed?

[Bug libfortran/50105] Possibly: [4.3/4.4/4.5/4.6/4.7 Regression] I/O with g6.5 - wrong number of "**" shown

2011-08-16 Thread burnus at gcc dot gnu.org 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50105

--- Comment #2 from Tobias Burnus  2011-08-17 
06:40:00 UTC ---
Bob's point is that for 1.0, the following rule (10.7.5.2.2) applies:

"Magnitude of Internal Value" is 1.0 and thus the "Equivalent Conversion" is
F2.5,4(' '). Thus, one has "**" for F followed by 4 spaces.

Cf. http://j3-fortran.org/pipermail/j3/2011-August/004575.html

[Bug libfortran/50105] Possibly: [4.3/4.4/4.5/4.6/4.7 Regression] I/O with g6.5 - wrong number of "**" shown

2011-08-16 Thread burnus at gcc dot gnu.org 
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50105

--- Comment #1 from Tobias Burnus  2011-08-17 
06:22:20 UTC ---
Actually, I think that this bug is invalid - but wait for the answers at the J3
mailing list. The reason I think that I think that 6 asterisks should be
produced are stated below. However, it would not be the first time that I
missed something.


We have (refs = F2008):

  R1007 data-edit-desc  is  ...
or  G w [ . d [ E e ] ]

such that for G6.5, one has "w = 6".


And thus, I expect 6 "*" as: if the "characters produced exceeds the field
width, the processor shall fill the entire field of width w with asterisks"


Full quote:

10.7.2 Numeric editing, 10.7.2.1 General rules states:

"(5) On output, if an exponent exceeds its specified or implied width using the
E, EN, ES, D, or G edit descriptor, or the number of characters produced
exceeds the field width, the processor shall fill the entire field of width w
with asterisks. However, the processor shall not produce asterisks if the field
width is not exceeded when optional characters are omitted."