[Patch, Fortran, OOP] PR 47745: Segfault with CLASS(*) and derived type dummy arguments

[Dominique Dhumieres]

Janus,

The patch works as expected without regression. It even fixed the ICE for pr46328 which
is replaced by the following (probably wrong) error:

pr46328.f90:22.6:

  u = (u)*2.
      1
Error: Operands of binary numeric operator '*' at (1) are CLASS(field)/REAL(4)

The "Fatal Error: Unlimited polymorphism at (1) not yet supported" is also much
cleaner than the previous errors.

Thanks for the patch,

Dominique

PS. This is not a review;-)