Mercurial > hg > CbC > CbC_gcc

view gcc/testsuite/gcc.c-torture/compile/pr39636.c @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
line wrap: on
line source

typedef float real;
typedef real rvec[3];
void calc_dx2dx(real *, real *);
void phi_sr(int nj,rvec x[],int k)
{
  int i,j;
  for(i=0; (i<nj-1); i++)
    for(j=i+1; (j<nj); j++)
      if (k)
	calc_dx2dx(x[i],x[j]);
}