blob: 2191d388a343dfa1169835e6b77c8a7ad5c1a561 [file] [log] [blame]
-- { dg-do compile }
with Incomplete4_Pkg; use Incomplete4_Pkg;
with System;
procedure Incomplete4 is
L : System.Address := A'Address;
begin
null;
end;