[patch, fortran] Fix PR 87673, rejects-valid

[Thomas Koenig]

Am 10.03.19 um 22:12 schrieb Thomas Koenig:

> You're probably right, I will fix this.  Ugh...

OK, so here is the updated test case, without the copyright stuff.

OK for trunk now? :-)

Regards

	Thomas
-------------- next part --------------
A non-text attachment was scrubbed...
Name: charlen_17.f90
Type: text/x-fortran
Size: 322 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20190310/0d172f0c/attachment.bin>