1 2 3 4 5 6 7 8
-- { dg-do run } with Allocator_Maxalign2; procedure Test_Allocator_Maxalign2 is begin Allocator_Maxalign2.Check; end;