array40_pkg.ads\gnat.dg\testsuite\gcc - riscv-gnu-toolchain/gcc.git - Unnamed repository; edit this file 'description' to name the repository.

index : riscv-gnu-toolchain/gcc.git

Unnamed repository; edit this file 'description' to name the repository.

root

about summary refs log tree commit diff

path: root/gcc/testsuite/gnat.dg/array40_pkg.ads

blob: a3cec8b43f47f559d2249a8e356502721730491e (plain)

package Array40_Pkg is

  type Rec is record
    I : Integer;
  end record;

  type Arr is array (1 .. 4) of Rec;
  for Arr'Component_Size use 40;

  A : Arr;

end Array40_Pkg;