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

blob: 4510b0e9c9210936ee7c4492df951bbbcf53c919 (plain)

package Loop_Optimization21 is

  type Item is new Float;

  type Item_Vector is array (Positive range <>) of Item;

  function Min (X : Item_Vector) return Item;

end Loop_Optimization21;