diff options
Diffstat (limited to 'gcc/testsuite/gnat.dg/vect12.ads')
| -rw-r--r-- | gcc/testsuite/gnat.dg/vect12.ads | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/vect12.ads b/gcc/testsuite/gnat.dg/vect12.ads new file mode 100644 index 00000000000..a600d0fa5dc --- /dev/null +++ b/gcc/testsuite/gnat.dg/vect12.ads @@ -0,0 +1,10 @@ +package Vect12 is + + -- Constrained array types are vectorizable + type Sarray is array (1 .. 4) of Float; + for Sarray'Alignment use 16; + + function "+" (X, Y : Sarray) return Sarray; + procedure Add (X, Y : Sarray; R : out Sarray); + +end Vect12; |