[Bug fortran/52370] [4.7/4.8/4.9 Regression] Spurious "may be used uninitialized" warning for check of optional argument

[jakub at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=52370

--- Comment #7 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Created attachment 32107
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=32107&action=edit
gcc49-pr52370.patch

So, how about this patch?