gcc/testsuite/gnat.dg/equal4.ads

with Equal4_Full_Selector_Filter;

package Equal4 is
   procedure Compare (Obj : Equal4_Full_Selector_Filter.Object_T);
end Equal4;