URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 313 |
Rev 338 |
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-O3 -mcpu=cortex-a8 -mfpu=vfp3 -mfloat-abi=softfp" } */
|
/* { dg-options "-O3 -mcpu=cortex-a8 -mfpu=vfp3 -mfloat-abi=softfp" } */
|
|
|
typedef struct cb
|
typedef struct cb
|
{
|
{
|
int cxc;
|
int cxc;
|
short int pside;
|
short int pside;
|
} *CBPTR;
|
} *CBPTR;
|
typedef struct rwb
|
typedef struct rwb
|
{
|
{
|
int stx;
|
int stx;
|
} RWB;
|
} RWB;
|
extern CBPTR *car;
|
extern CBPTR *car;
|
extern RWB *rwAr;
|
extern RWB *rwAr;
|
extern int nts;
|
extern int nts;
|
extern int nRws;
|
extern int nRws;
|
void f()
|
void f()
|
{
|
{
|
CBPTR pptr ;
|
CBPTR pptr ;
|
int k_lt, k_rt, k_span, rw, p, rt;
|
int k_lt, k_rt, k_span, rw, p, rt;
|
int sa ;
|
int sa ;
|
k_rt = 0;
|
k_rt = 0;
|
k_lt = 10000000;
|
k_lt = 10000000;
|
for (rw = 1; rw <= nRws; rw++)
|
for (rw = 1; rw <= nRws; rw++)
|
k_lt = rwAr[rw].stx;
|
k_lt = rwAr[rw].stx;
|
k_span = k_rt - k_lt;
|
k_span = k_rt - k_lt;
|
for (; p <= nts; p++)
|
for (; p <= nts; p++)
|
{
|
{
|
pptr = car[p];
|
pptr = car[p];
|
if (pptr->pside == 3)
|
if (pptr->pside == 3)
|
pptr->cxc += (int)(((double)rt / (double) k_span) *((double) sa));
|
pptr->cxc += (int)(((double)rt / (double) k_span) *((double) sa));
|
}
|
}
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.