[Bug fortran/96255] [F2018] Implement optional type spec for index in DO CONCURRENT

[kargl at gcc dot gnu.org]

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

--- Comment #3 from kargl at gcc dot gnu.org ---
(In reply to kargl from comment #2)
> This issue depends on the fix for FORALL.  In gfc_match_do in the concurrent
> section, one gets to 
> 
>       m = match_forall_header (&head, &mask);
> 
> to match the control portion of the statement.

This should be trivial for a new gfortran contributor.  In
match.c(match_forall_header) prior to line 2401

  m = match_forall_iterator (&new_iter);

one needs to essentially copy lines 1229-1259 from array.c
and modify the checks to enforce an integer type.