[Bug fortran/118740] New: [OpenMP] 'sorry' used without location data

[burnus at gcc dot gnu.org via Gcc-bugs]

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

            Bug ID: 118740
           Summary: [OpenMP] 'sorry' used without location data
           Product: gcc
           Version: 15.0
            Status: UNCONFIRMED
          Keywords: diagnostic, openmp
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: burnus at gcc dot gnu.org
                CC: sandra at gcc dot gnu.org
  Target Milestone: ---

Message like

f951: sorry, unimplemented: declarative directive variants are not supported

without location data is not very helpful. That's the call:

   sorry ("%<requires%> selector is not supported yet");

Expected:

   sorry_at (gfc_get_location (&gfc_current_locus), ...

or similar.

* * *

A grep shows the following cases (+ options.cc, which should be fine):

gcc/fortran/openmp.cc:              sorry ("%<requires%> selector is not
supported yet");
gcc/fortran/openmp.cc:  sorry ("declarative directive variants are not
supported");
gcc/fortran/trans-openmp.cc:                    sorry ("optional class
parameter");
gcc/fortran/trans-openmp.cc:                    sorry ("unhandled expression
type");
gcc/fortran/trans-openmp.cc:            sorry ("unhandled expression");