[PATCH] Fortran : Bogus error with additional blanks in type(*) PR95829

[Mark Eggleston]

On 24/06/2020 10:13, Manfred Schwarb wrote:
> Am 24.06.20 um 10:12 schrieb Mark Eggleston:
>> Please find a fix for PR95829.  Original patch by Steve Kargl posted to PR.
>>
>> Commit to master and backport?
>>
>> Commit message:
>>
>> Fortran  : Bogus error with additional blanks in type(*) PR95829
>>
>> Checking for "* ) " instead of "*)" clears the bogus error.
>>
>> 2020-06-24  Steven G. Kargl  <kargl@gcc.gnu.org>
>>
>> gcc/fortran/
>>
>>      PR fortran/95829
>>      * decl.c (gfc_match_decl_type_spec): Compare with "* ) " instead
>>      of "*)".
>>
>> 2020-06-24  Mark Eggleston <markeggleston@gcc.gnu.org>
>>
>> gcc/testsuite/
>>
>>      PR fortran/95829
>>      * gfortran.dg/pr95829.f90: New test.
>>
> @@ -0,0 +1,14 @@
> +! {dg-do compile }
> +!
> +! Declaration of b used to be a bogus failure.
>
> { dg-do compile }
>
> with surrounding spaces, otherwise this dg-directive will not be recognized.
>
Fixed the test case, the new patch is attached.

OK for commit to master and backports?

Updated commit message:

Fortran  : Bogus error with additional blanks in type(*) PR95829

Checking for "* ) " instead of "*)" clears the bogus error.

2020-06-30  Steven G. Kargl  <kargl@gcc.gnu.org>

gcc/fortran/

     PR fortran/95829
     * decl.c (gfc_match_decl_type_spec): Compare with "* ) " instead
     of "*)".

2020-06-30  Mark Eggleston <markeggleston@gcc.gnu.org>

gcc/testsuite/

     PR fortran/95829
     * gfortran.dg/pr95829.f90: New test.

-- 
https://www.codethink.co.uk/privacy.html

-------------- next part --------------
A non-text attachment was scrubbed...
Name: 0001-PR95829.patch
Type: text/x-patch
Size: 1751 bytes
Desc: not available
URL: <https://gcc.gnu.org/pipermail/gcc-patches/attachments/20200630/4deea656/attachment.bin>