gcc/testsuite/gcc.dg/tree-ssa/pr23434.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-O2" } */
   3
   4 cblas_csyr2k (int N, void *A, int lda, float *B, int ldb, float *C, int k)
   5 {
   6   int i, j;
   7   for (;; k ++)
   8     {
   9       for (i = 0; i < N; i ++)
  10         {
  11           float t = ((float * ) A) [i];
  12           for (j = i; j < N; j ++)
  13             {
  14               C [i + j] = B [ldb] * ((float *) A) [k];
  15               C [lda] = 0 ;
  16             }
  17         }
  18     }
  19 }