[Bug ada/123003] New: -gnatwu does not flag unused use clause when child package use clause present

[jesper.quorning at gmail dot com via Gcc-bugs]

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

            Bug ID: 123003
           Summary: -gnatwu does not flag unused use clause when child
                    package use clause present
           Product: gcc
           Version: 15.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: ada
          Assignee: unassigned at gcc dot gnu.org
          Reporter: jesper.quorning at gmail dot com
                CC: dkm at gcc dot gnu.org
  Target Milestone: ---

Consider this program:

```ada
with Ada.Text_IO;

procedure Program
is
   use Ada;
   use Ada.Text_IO;
begin
   Put_Line ("Greetings");
end Program;
```

Build with:

$ gnatmake -gnatwu program.adb
gcc -c -gnatwu program.adb
gnatbind -x program.ali
gnatlink program.ali

Expected:
Warning about unused use clause in line with `Use Ada`.

Merry X-mas