https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68560
--- Comment #9 from Jan Hubicka <hubicka at ucw dot cz> --- > > Well, it is not how I read > > > > static integer(kind=4) C.3452 = 4; > > ... > > D.3451 = &x; > > D.3453 = &C.3452; > > _gfortran_shape_4 (&parm.2, D.3451, D.3453); > > > > There is a third argument D.3453 and its value is 4 (if it's not the KIND, > > what is it?). > > In this case, the argument _is_ present, so it's not removed in the procedure Yep, the problem is that _gfortran_shape_4 is declared with both the optional parameter and without. This should not happen. Ideally gfortran should produce just one declaration per translation unit and that needs to include the optional param. Honza
