blob: 330f97b5d0e0d4bf6871a409ba201a5001e8b49d [file] [log] [blame]
-- RUN: %llvmgcc -S %s -I%p/Support
package body Global_Constant is
begin
raise An_Error;
end;