1 package Loop_Optimization11_Pkg is
3 function Img (X : Integer) return String;
5 procedure Put_Line (Data : String);
7 type Prot is (Execute, Execute_Read, Execute_Read_Write);
9 type Mem is (Mem_Image, Mem_Mapped, Mem_Private, Unknown);
11 end Loop_Optimization11_Pkg;