[Bug fortran/122089] generic resolution problem with composite PDT

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

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

--- Comment #2 from Paul Thomas <pault at gcc dot gnu.org> ---
Created attachment 62467
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=62467&action=edit
Tentative fix for comment 1

With the attached applied, this runs correctly:

!!!insert testcase here
  use input_output_pair_m
  type(input_output_pair_t(kind(1d0))) :: tgt
  tgt%inputs_%values_ = 42d0
  call double_precision_write_to_stdout(tgt)
end

pault@fedora:~/prs/pdt$ ./a.out
   42.000000000000000     

It even regtests OK :-)

Paul