3 My_Global_Variable
: Integer := 1;
5 Exported_Capitalized
: Integer := 2;
6 pragma Export
(C
, Exported_Capitalized
, "Exported_Capitalized");
8 Local_Identical_One
: Integer := 4;
9 Local_Identical_Two
: Integer := 8;
11 External_Identical_One
: Integer := 19;
14 Inside_Variable
: Integer := 3;
17 procedure Proc
(I
: Integer);