[Bug fortran/79382] New: DTIO ICE

[walt.brainerd at gmail dot com]

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

            Bug ID: 79382
           Summary: DTIO ICE
           Product: gcc
           Version: 7.0.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: walt.brainerd at gmail dot com
  Target Milestone: ---

Created attachment 40671
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=40671&action=edit
g_bug.f90; complete program

DTIO ICE

$ gfortran --version
GNU Fortran (GCC) 7.0.1 20170122 (experimental)

Walt@HP_Envy /cygdrive/c/walt/ZHI/FC/FC_Code/Dollar_Bug
$ gfortran -Wall -Wextra g_bug.f90
f951.exe: internal compiler error: gfc_get_default_type(): Bad symbol
'_dtio_formatted_write'
libbacktrace could not find executable to open

Note: Things seem to work using an interface block
rather than GENERIC ::