blob: 41c6775342613bf2932c60f07cb0ea197c606767 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
/* { dg-options "-O2 -floop-block" } */
typedef struct test input ;
struct test
{
int type ;
int symflag ;
};
Chv_copyEntriesToVector ( input *chv,double *dvec)
{
double *entries ;
int mm, nent;
int first, i, k , stride ;
if ( ((chv)->type == 1) )
{
for ( i = 0 ; i < 10 ; i++)
{
dvec[2*mm] = entries[2*k] ;
k += stride ;
stride -= 2 ;
}
}
return(mm) ;
}
|