package Global_Constant is
   pragma Elaborate_Body;
   An_Error : exception;
end;
syntax highlighted by Code2HTML, v. 0.9.1