https://gcc.gnu.org/bugzilla/show_bug.cgi?id=115315
--- Comment #3 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to anlauf from comment #1)
> Reduced testcase:
>
> subroutine p2
> type t1(n1,n2)
> integer,kind :: n1,n2
> integer :: c2(iachar('ABCDEFGHIJ'(n1:n1)))
> end type
> end
>
> The current implementation is known to be incomplete.
Hi Harald,
When you posted this message, did this give?
rm: cannot remove '*.original': No such file or directory
pr115315.f90:21:25:
21 | integer :: c2(iachar('ABCDEFGHIJ'(n1:n1)))
| 1
Error: Argument of IACHAR at (1) must be of length one
pr115315.f90:21:25:
21 | integer :: c2(iachar('ABCDEFGHIJ'(n1:n1)))
| 1
Error: Argument of IACHAR at (1) must be of length one
Cheers
Paul
