[fortran] spurious initialized warning with select-case?

[Eric Botcazou]

> I'm not sure if it would work and I have idea where in trans*.c
> you need to do this, but if you mark the tree as used with
> something like
>
> TREE_USED (__result_f) = 1
>
> the middle-end may be silenced.

I think that TREE_NO_WARNING would be more appropriate for this purpose.

-- 
Eric Botcazou