URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [vect-iv-8a.c] - Rev 689
Compare with Previous | Blame | View Log
/* { dg-require-effective-target vect_int } */ #include <stdarg.h> #include "tree-vect.h" #define N 26 __attribute__ ((noinline)) int main1 (short X) { signed char a[N]; short b[N]; int c[N]; short myX = X; int i; /* vectorization of induction with type conversions. */ for (i = 0; i < N; i++) { a[i] = (signed char)X; b[i] = X; c[i] = (int)X; X++; } /* check results: */ for (i = 0; i < N; i++) { if (a[i] != (signed char)myX || b[i] != myX || c[i] != (int)myX++) abort (); } return 0; } int main (void) { check_vect (); return main1 (3); } /* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { target { vect_pack_trunc && vect_unpack } } } } */ /* { dg-final { cleanup-tree-dump "vect" } } */