URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [pr24300.c] - Rev 801
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do compile } */ static int *** foo (int); void bar () { int ***p = foo (2); } extern int *nd; extern int ***tc; extern int *ap; extern int *as; extern float ss; static int *** foo (int Fc) { int i, j, s, p, n, t; n = 0; for (s = 0; s < 4; s++) n += nd[s]; for (i = 0; i < n; i++) { p = ap[i]; s = as[i]; for (j = 0; j < Fc; j++) tc[p][s][j] = i * ss + j; } return (tc); } /* { dg-final { cleanup-tree-dump "vect" } } */
Go to most recent revision | Compare with Previous | Blame | View Log