[PATCH] Fortran - Error compiling PDT Type-bound Procedures [PR82943/86148/86268]

2024-02-10 Thread Alexander Westbrooks
Hello, I have implemented a patch that fixes compile time errors for valid PDT type-bound procedures. I wrote 4 new tests that address the test-cases in PR 82943, PR 86148, and PR 86268, since the patch fixes all three of them. All regression tests pass, including the new ones. This was tested on

Need a hint or more likely help

2024-02-10 Thread Steve Kargl
All, consider this simple code: module foo contains subroutine bar character(len=:), allocatable :: s(:) call bah(s) end subroutine bar end module foo If one compiles with -fdump-tree-original, one see (with some pruning) void bar () { integer(kind=8)

Re: Need a hint or more likely help

2024-02-10 Thread Steve Kargl
On Sat, Feb 10, 2024 at 06:00:42PM -0800, Steve Kargl wrote: > > The problem here is that sym->ts.u.cl->length == NULL. If I change > the conditional to > > if (sym->ts.type == BT_CHARACTER > && sym->ts.u.cl->length > && !INTEGER_CST_P (sym->ts.u.cl->backend_decl)) > > then the o