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