package Pkg is
   procedure Foo is null;
   pragma Find_All_References (Any);
end Pkg;
