testcase for PR1446

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

-- RUN: %llvmgcc -c %s -o /dev/null
package body Global_Constant is
begin
   raise An_Error;
end;