1 2 3 4 5
-- RUN: %llvmgcc -c %s -I%p/Support package body Global_Constant is begin raise An_Error; end;