[Bug libfortran/84156] New: [8 Regression] valgrind error with print *,1

[tkoenig at gcc dot gnu.org]

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

            Bug ID: 84156
           Summary: [8 Regression] valgrind error with print *,1
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: libfortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: tkoenig at gcc dot gnu.org
  Target Milestone: ---

The test case is about as simple as it gets:

$ cat 1.f90 
print *,1
end
$ gfortran -g 1.f90
$ valgrind ./a.out
==11259== Memcheck, a memory error detector
==11259== Copyright (C) 2002-2017, and GNU GPL'd, by Julian Seward et al.
==11259== Using Valgrind-3.13.0 and LibVEX; rerun with -h for copyright info
==11259== Command: ./a.out
==11259== 
==11259== Conditional jump or move depends on uninitialised value(s)
==11259==    at 0x50703FB: write_decimal.constprop.10 (write.c:808)
==11259==    by 0x50707B3: write_integer (write.c:1351)
==11259==    by 0x507165D: list_formatted_write_scalar (write.c:1865)
==11259==    by 0x5072334: _gfortrani_list_formatted_write (write.c:1943)
==11259==    by 0x400731: MAIN__ (1.f90:1)
==11259==    by 0x400777: main (1.f90:2)
==11259== 
           1
==11259== 
==11259== HEAP SUMMARY:
==11259==     in use at exit: 0 bytes in 0 blocks
==11259==   total heap usage: 21 allocs, 21 frees, 13,520 bytes allocated
==11259== 
==11259== All heap blocks were freed -- no leaks are possible
==11259== 
==11259== For counts of detected and suppressed errors, rerun with: -v
==11259== Use --track-origins=yes to see where uninitialised values come from
==11259== ERROR SUMMARY: 1 errors from 1 contexts (suppressed: 0 from 0)