Mercurial > hg > CbC > CbC_gcc

view gcc/testsuite/gnat.dg/specs/loop_optimization1_pkg.ads @ 145:1830386684a0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-9.2.0
author anatofuz
date Thu, 13 Feb 2020 11:34:05 +0900
parents 04ced10e8804
children
line wrap: on
line source

-- { dg-excess-errors "no code generated" }

generic

  type Element_Type is private;
  type Index_Type is (<>);
  type Constrained_Array_Type is array (Index_Type) of Element_Type;

package Loop_Optimization1_Pkg is

  procedure Proc (CA : in out Constrained_Array_Type);

end Loop_Optimization1_Pkg;