[Bug fortran/119136] New: Printing result of function that prints itself hangs

[vehre at gcc dot gnu.org via Gcc-bugs]

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

            Bug ID: 119136
           Summary: Printing result of function that prints itself hangs
           Product: gcc
           Version: 15.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: vehre at gcc dot gnu.org
  Target Milestone: ---

Reproducer:

  print *, foo_io()

contains

  function foo_io()
    integer :: foo_io(2)

    print * , "foo"
    foo_io = [42, 42]
  end function

end

Hangs with no output. Probably nesting IO is not supported.