gfortran, patch for PR 20788

[Tobias Schlüter]

coudert@lcp.u-psud.fr wrote:
> Regtested on i686-linux. OK for mainline?

No, because you're allowing signs in the middle of the number.

> @@ -109,7 +109,7 @@ init_integer (variable * v)
>      goto set_default;
>  
>    for (q = p; *q; q++)
> -    if (!isdigit (*q))
> +    if (!isdigit (*q) && *q != '-')
>        {
>  	v->bad = 1;
>  	goto set_default;

With that fixed this is ok (supposed negative unit numbers don't work, I
remember you had a patch for that a few days ago?)

- Tobi