[Bug fortran/68940] -Wno-error=compare-reals not working

[jahns at dkrz dot de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68940

--- Comment #3 from Thomas Jahns <jahns at dkrz dot de> ---
Created attachment 37111
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=37111&action=edit
Source to demonstrate problem with  -Wno-error=unused-parameter

Running gfortran shows the problem:

$ gfortran -Wall -Werror -Wextra -Wno-error=unused-parameter -o
gfortran-werror-wunused-parameter gfortran-werror-wunused-parameter.f90 ; echo
$?
gfortran-werror-wunused-parameter.f90:2.24:

  REAL, PARAMETER :: bar = 0.5
                        1
Warning: Unused parameter 'bar' declared at (1)

1

But I just noticed this is no longer a problem with gfortran 5.1.0, only in
4.9.2.