# HG changeset patch
# User michael
# Date 1218987355 0
# Node ID 29d015080b3ddc15f9f837b45c85ab042e3eb1b1
# Parent  288f054e06e8c1704a23f1d20210b458a1dce6ca
Do not mix declarations and statements (by ramiro).

diff -r 288f054e06e8 -r 29d015080b3d pca.c
--- a/pca.c	Sun Aug 17 15:33:17 2008 +0000
+++ b/pca.c	Sun Aug 17 15:35:55 2008 +0000
@@ -126,11 +126,11 @@
                 z[i] -= t*covar;
                 z[j] += t*covar;
 
-#define ROTATE(a,i,j,k,l)\
+#define ROTATE(a,i,j,k,l) {\
     double g=a[j + i*n];\
     double h=a[l + k*n];\
     a[j + i*n]=g-s*(h+g*tau);\
-    a[l + k*n]=h+s*(g-h*tau);
+    a[l + k*n]=h+s*(g-h*tau); }
                 for(k=0; k<n; k++) {
                     if(k!=i && k!=j){
                         ROTATE(pca->covariance,FFMIN(k,i),FFMAX(k,i),FFMIN(k,j),FFMAX(k,j))