URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [pr25413a.c] - Rev 816
Compare with Previous | Blame | View Log
/* { dg-require-effective-target vect_double } */ #include "tree-vect.h" #define N 8 typedef __SIZE_TYPE__ size_t; extern void *malloc (size_t __size) __attribute__ ((__nothrow__, __malloc__)); typedef double num_t; static const num_t num__infty = ((num_t)1.0)/((num_t)0.0); struct oct_tt; typedef struct oct_tt oct_t; typedef unsigned int var_t; typedef enum { OCT_EMPTY = 0, OCT_NORMAL = 1, OCT_CLOSED = 2 } oct_state; struct oct_tt { var_t n; int ref; oct_state state; struct oct_tt* closed; num_t* c; }; void* octfapg_mm_malloc (size_t t); oct_t* octfapg_alloc (var_t n); oct_t* octfapg_full_copy (oct_t* m); struct mmalloc_tt; typedef struct mmalloc_tt mmalloc_t; struct mmalloc_tt { int id; int nb_alloc; int nb_realloc; int nb_free; size_t rem; size_t max; size_t tot; }; typedef struct { size_t size; mmalloc_t* mm; int id; double dummy; } mmheader_t; void* octfapg_mm_malloc (size_t t) { char* m = (char*)malloc(t+sizeof(mmheader_t)); return m+sizeof(mmheader_t); } oct_t* octfapg_empty (var_t n); oct_t* octfapg_empty (const var_t n) { oct_t* m; /*octfapg_timing_enter("oct_empty",3);*/ m = ((oct_t*) octfapg_mm_malloc (sizeof(oct_t))); m->n = n; m->ref = 1; m->state = OCT_EMPTY; m->closed = (oct_t*)((void *)0); m->c = (num_t*)((void *)0); /*octfapg_timing_exit("oct_empty",3);*/ return m; } oct_t* octfapg_alloc (const var_t n) { size_t nn = (2*(size_t)(n)*((size_t)(n)+1)); oct_t* m; m = octfapg_empty(n); m->c = ((num_t*) octfapg_mm_malloc (sizeof(num_t)*(nn))); ; m->state = OCT_NORMAL; m->closed = (oct_t*)((void *)0); return m; } oct_t* octfapg_universe (const var_t n) { oct_t* m; size_t i, nn = (2*(size_t)(n)*((size_t)(n)+1)); m = octfapg_alloc(n); for (i=0;i<nn;i++) *(m->c+i) = num__infty; for (i=0;i<2*n;i++) *(m->c+((size_t)(i)+(((size_t)(i)+1)*((size_t)(i)+1))/2)) = (num_t)(0); m->state = OCT_CLOSED; return m; } int main (void) { int i; check_vect (); oct_t *p = octfapg_universe(10); return 0; } /* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */ /* { dg-final { scan-tree-dump-times "vector alignment may not be reachable" 1 "vect" { target { ! vect_aligned_arrays } } } } */ /* { dg-final { scan-tree-dump-times "Alignment of access forced using versioning" 1 "vect" { target { ! vect_aligned_arrays } } } } */ /* { dg-final { cleanup-tree-dump "vect" } } */