mirror of
https://github.com/nArnoSNES/tcc-65816.git
synced 2024-05-31 22:41:28 +00:00
31 lines
481 B
C
31 lines
481 B
C
/* From PR 18977. */
|
|
void foo(float * x);
|
|
|
|
int main()
|
|
{
|
|
float x[4];
|
|
foo (x);
|
|
return 0;
|
|
}
|
|
|
|
void foo (float *x)
|
|
{
|
|
int i,j,k;
|
|
float temp;
|
|
static float t16[16]={1.,2.,3.,4.,5.,6.,7.,8.,9.,
|
|
10.,11.,12.,13.,14.,15.,16.};
|
|
static float tmp[4]={0.,0.,0.,0.};
|
|
|
|
for (i=0; i<4; i++) {
|
|
k = 3 - i;
|
|
temp = t16[5*k];
|
|
for(j=k+1; j<4; j++) {
|
|
tmp[k] = t16[k+ j*4] * temp;
|
|
}
|
|
}
|
|
x[0] = tmp[0];
|
|
x[1] = tmp[1];
|
|
x[2] = tmp[2];
|
|
x[3] = tmp[3];
|
|
}
|