blob: 7c8e85e85d763c3388f140ad79300f9f35621397 [file] [log] [blame]
package Opt74_Pkg is
A : array (1 .. 10) of Integer := (others => 0);
procedure Proc (Found : out Integer; Index : out Integer);
end Opt74_Pkg;