inline18_gen1.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/inline18_gen1.ads

blob: 54e569302bc59201838018b53beb37f4af061096 (plain)

generic

  type Bound_T is private;

package Inline18_Gen1 is

  type T is private;
  function Complete return T with Inline_Always;

private

  type T is array (0 .. 1) of Bound_T;

end Inline18_Gen1;