gcc/testsuite/gnat.dg/dimensions2_real_numbers.ads

package Dimensions2_Real_Numbers is
  type Real is new Long_Float;
end;