array38_pkg.adb\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/array38_pkg.adb

blob: ebaa66eba8e2a96d0d7953b4ad5782ab66dfb579 (plain)

package body Array38_Pkg is

   function F (Data : Array_Type) return Value_Type is
   begin
      return Value_Type'First;
   end;

end Array38_Pkg;