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

--- Comment #14 from dave.anglin at bell dot net ---
On 2019-01-26 7:25 a.m., dominiq at lps dot ens.fr wrote:
> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=79540
>
> --- Comment #13 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
>> print '(f1.0)',    100.000000      ! => len=    1 *: no digits
>> print '(f2.0)',    100.000000      ! => len=    0 : no digits
>> print '(f3.0)',    100.000000      ! => len=    0 : no digits
>> print '(f1.1)',    100.000000      ! => len=    1 *: no digits
>> print '(f3.1)',    100.000000      ! => len=    0 : no digits
> On darwin I get
>
>  print '(f1.0)',    100.000000      ! => len=    1 *: no digits
>  print '(f2.0)',    100.000000      ! => len=    2 **: no digits
>  print '(f3.0)',    100.000000      ! => len=    3 ***: no digits
>  print '(f1.1)',    100.000000      ! => len=    1 *: no digits
>  print '(f2.1)',    100.000000      ! => len=    2 **: no digits
>  print '(f3.1)',    100.000000      ! => len=    3 ***: no digits
>
> What is the output of
>
> print '(f3.1)',    100.000000
> end
>
> ? If it not '***', it looks like a bug in your libraries?
>
It's '***'.

Reply via email to