This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug libfortran/33225] [4.3 regression] Missing last digit is some formatted output (on 32bit targets)



------- Comment #9 from dominiq at lps dot ens dot fr  2007-08-30 21:04 -------
The following code:

real x
x = 1.0
print '(3E20.2e2)', x, x/10.0, x/100.0
print '(3E20.2e3)', x, x/10.0, x/100.0
print '(3E20.2e4)', x, x/10.0, x/100.0
print '(3E20.2e5)', x, x/10.0, x/100.0
print '(3E20.2e6)', x, x/10.0, x/100.0
print '(3E20.2e7)', x, x/10.0, x/100.0
print '(3E20.3e2)', x, x/10.0, x/100.0
print '(3E20.3e3)', x, x/10.0, x/100.0
print '(3E20.3e4)', x, x/10.0, x/100.0
print '(3E20.3e5)', x, x/10.0, x/100.0
print '(3E20.3e6)', x, x/10.0, x/100.0
print '(3E20.3e7)', x, x/10.0, x/100.0
print '(3E20.4e2)', x, x/10.0, x/100.0
print '(3E20.4e3)', x, x/10.0, x/100.0
print '(3E20.4e4)', x, x/10.0, x/100.0
print '(3E20.4e5)', x, x/10.0, x/100.0
print '(3E20.4e6)', x, x/10.0, x/100.0
print '(3E20.4e7)', x, x/10.0, x/100.0
end

gives on Darwin without options:

            0.10E+01            0.10E+00            0.10E-01
           0.10E+00^@           0.10E+00^@           0.10E-00^@
          0.10E+00^@e          0.10E+00^@e          0.10E-00^@e
        0.10E+00^@e+0        0.10E+00^@e-0        0.10E-00^@e-0
       0.10E+00^@e+00       0.10E+00^@e-01       0.10E-00^@e-02
           0.100E+01           0.100E+00           0.100E-01
          0.100E+00^@          0.100E+00^@          0.100E-00^@
         0.100E+00^@0         0.100E+00^@0         0.100E-00^@0
        0.100E+00^@0e        0.100E+00^@0e        0.100E-00^@0e
       0.100E+00^@0e+       0.100E+00^@0e-       0.100E-00^@0e-
      0.100E+00^@0e+0      0.100E+00^@0e-0      0.100E-00^@0e-0
          0.1000E+01          0.1000E+00          0.1000E-01
         0.1000E+00^@         0.1000E+00^@         0.1000E-00^@
        0.1000E+00^@0        0.1000E+00^@0        0.1000E-00^@0
       0.1000E+00^@00       0.1000E+00^@00       0.1000E-00^@00
      0.1000E+00^@00e      0.1000E+00^@00e      0.1000E-00^@00e
     0.1000E+00^@00e+     0.1000E+00^@00e-     0.1000E-00^@00e-

with -m64:

            0.10E+01            0.10E+00            0.10E-01
           0.10E+001           0.10E+000           0.10E-001
          0.10E+0001          0.10E+0000          0.10E-0001
         0.10E+00001         0.10E+00000         0.10E-00001
        0.10E+000001        0.10E+000000        0.10E-000001
       0.10E+000000^@       0.10E+000000^@       0.10E-000000^@
           0.100E+01           0.100E+00           0.100E-01
          0.100E+001          0.100E+000          0.100E-001
         0.100E+0001         0.100E+0000         0.100E-0001
        0.100E+00001        0.100E+00000        0.100E-00001
       0.100E+000001       0.100E+000000       0.100E-000001
      0.100E+000000^@      0.100E+000000^@      0.100E-000000^@
          0.1000E+01          0.1000E+00          0.1000E-01
         0.1000E+001         0.1000E+000         0.1000E-001
        0.1000E+0001        0.1000E+0000        0.1000E-0001
       0.1000E+00001       0.1000E+00000       0.1000E-00001
      0.1000E+000001      0.1000E+000000      0.1000E-000001
     0.1000E+000000^@     0.1000E+000000^@     0.1000E-000000^@

instead of (xlg, g95):

            0.10E+01            0.10E+00            0.10E-01
           0.10E+001           0.10E+000           0.10E-001
          0.10E+0001          0.10E+0000          0.10E-0001
         0.10E+00001         0.10E+00000         0.10E-00001
        0.10E+000001        0.10E+000000        0.10E-000001
       0.10E+0000001       0.10E+0000000       0.10E-0000001
           0.100E+01           0.100E+00           0.100E-01
          0.100E+001          0.100E+000          0.100E-001
         0.100E+0001         0.100E+0000         0.100E-0001
        0.100E+00001        0.100E+00000        0.100E-00001
       0.100E+000001       0.100E+000000       0.100E-000001
      0.100E+0000001      0.100E+0000000      0.100E-0000001
          0.1000E+01          0.1000E+00          0.1000E-01
         0.1000E+001         0.1000E+000         0.1000E-001
        0.1000E+0001        0.1000E+0000        0.1000E-0001
       0.1000E+00001       0.1000E+00000       0.1000E-00001
      0.1000E+000001      0.1000E+000000      0.1000E-000001
     0.1000E+0000001     0.1000E+0000000     0.1000E-0000001


-- 


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]