# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1238033098 14400
# Node ID 728e7943752d09ec7547169446403818db6c0eac
# Parent  12ca81f1fa9951c06c895f1ad7fe4b170fdbe006
EIG.cc: avoid volatile decl for tmp variable

diff -r 12ca81f1fa99 -r 728e7943752d liboctave/ChangeLog
--- a/liboctave/ChangeLog	Wed Mar 25 19:02:15 2009 -0400
+++ b/liboctave/ChangeLog	Wed Mar 25 22:04:58 2009 -0400
@@ -1,5 +1,9 @@
 2009-03-25  John W. Eaton  <jwe@octave.org>
 
+	* EIG.cc (EIG::init (const Matrix&, bool),
+	EIG::init (const Matrix&, const Matrix&, bool)):
+	Avoid volaatile declaration for tmp variable.
+
 	* Makefile.in (MATRIX_INC): Add Sparse-diag-op-defs.h and
 	Sparse-perm-op-defs.h to the list.
 
diff -r 12ca81f1fa99 -r 728e7943752d liboctave/EIG.cc
--- a/liboctave/EIG.cc	Wed Mar 25 19:02:15 2009 -0400
+++ b/liboctave/EIG.cc	Wed Mar 25 22:04:58 2009 -0400
@@ -161,8 +161,8 @@
   Array<double> wi (n);
   double *pwi = wi.fortran_vec ();
 
-  volatile octave_idx_type nvr = calc_ev ? n : 0;
-  Matrix vr (nvr, nvr);
+  octave_idx_type tnvr = calc_ev ? n : 0;
+  Matrix vr (tnvr, tnvr);
   double *pvr = vr.fortran_vec ();
 
   octave_idx_type lwork = -1;
@@ -204,6 +204,7 @@
 	}
 
       lambda.resize (n);
+      octave_idx_type nvr = calc_ev ? n : 0;
       v.resize (nvr, nvr);
 
       for (octave_idx_type j = 0; j < n; j++)
@@ -507,8 +508,8 @@
   Array<double> beta (n);
   double *pbeta = beta.fortran_vec ();
 
-  volatile octave_idx_type nvr = calc_ev ? n : 0;
-  Matrix vr (nvr, nvr);
+  octave_idx_type tnvr = calc_ev ? n : 0;
+  Matrix vr (tnvr, tnvr);
   double *pvr = vr.fortran_vec ();
 
   octave_idx_type lwork = -1;
@@ -554,6 +555,7 @@
 	}
 
       lambda.resize (n);
+      octave_idx_type nvr = calc_ev ? n : 0;
       v.resize (nvr, nvr);
 
       for (octave_idx_type j = 0; j < n; j++)