c++: prvalue of array type [PR111286]
[official-gcc.git] / gcc / testsuite / gnat.dg / predicate8.adb
blob00196996afaf22a435dd0098191b1967a62b119e
1 -- { dg-do compile }
3 pragma Spark_Mode (On);
5 with Predicate8_Pkg;
7 procedure Predicate8 is
8 package Ring_Buffer is new Predicate8_Pkg (Element_Type => Integer);
9 use Ring_Buffer;
11 X : Ring_Buffer_Type (4);
13 begin
14 Put (X, 1);
15 end Predicate8;