blob: fbbc1c5e7f5bdcb3f7993a50c048138f3b691bfc [file] [log] [blame]
package Asan1_Pkg is
subtype E is Integer;
type T is array (1..32) of E;
function N return T;
function C (P : T) return E;
V : constant E := C (N);
end Asan1_Pkg;