1 /* { dg-do compile { target { powerpc*-*-* } } } */
2 /* { dg-skip-if "" { powerpc*-*-darwin* } } */
3 /* { dg-require-effective-target powerpc_vsx_ok } */
4 /* { dg-options "-O3 -mdejagnu-cpu=power7 -misel -ffast-math" } */
9 void Free2DArray (void **, int);
11 int Cluster(float **dmx
, int N
, struct phylo_s
*tree
)
19 for (col
= 0; col
< N
; Np
--)
21 for (row
= 0; row
< Np
; row
++)
22 for (col
= row
+1; col
< Np
; col
++)
23 if (mx
[row
][col
] < min
)
25 tree
[Np
-2].left
= coord
[i
];
27 Free2DArray((void **) mx
, N
);