1-- { dg-do compile } 2 3with Varsize3_Pkg1; use Varsize3_Pkg1; 4 5procedure Varsize3_4 is 6 7 Filter : Object renames True; 8 9begin 10 null; 11end; 12