https://gcc.gnu.org/bugzilla/show_bug.cgi?id=125616

--- Comment #6 from Peeter Joot <peeterjoot at protonmail dot com> ---
verified fixed on trunk:

ubuntu:/home/peeterjoot/tmp> gcobol 125616.cob  -dialect ibm
ubuntu:/home/peeterjoot/tmp> ./a.out 
 .15000000E 01
 .10000000E 00
-.27500000E 01
 .15000000E 04
 .27182800000000000E 01
ubuntu:/home/peeterjoot/tmp> gcobol 125616.cob 
ubuntu:/home/peeterjoot/tmp> ./a.out 
1.5
0.1000000015
-2.75
1500
2.71828000000000003
ubuntu:/home/peeterjoot/tmp> gcobol --version
gcobol (GCC) 17.0.0 20260604 (experimental)
Copyright (C) 2026 Free Software Foundation, Inc.
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

Reply via email to