tree f67d54700e613027f3d0f8fd3e2fe43d71cd06ef
parent 90bbe1042362658d64994da54a23bc62fc230b48
author peter klausler <pklausler@nvidia.com> 1617826659 -0700
committer Copybara-Service <copybara-worker@google.com> 1618251894 -0700

[flang] Enforce a limit on recursive PDT instantiations

For pernicious test cases with explicit non-constant actual
type parameter expressions in components, e.g.:

  type :: t(k)
    integer, kind :: k
    type(t(k+1)), pointer :: p
  end type

we should detect the infinite recursion and complain rather
than looping until the stack overflows.

Differential Revision: https://reviews.llvm.org/D100065

GitOrigin-RevId: 5091671c9ba2ca42ecede7b05347084b7c2dd974