Fix a bunch of issues found in a testcase from 400.perlbench.

[oota-llvm.git] / test / FrontendAda / global_constant.ads

package Global_Constant is
   pragma Elaborate_Body;
   An_Error : exception;
end;