diff liboctave/floatQR.cc @ 8806:c7864bb74914

avoid some GCC warnings
author John W. Eaton <jwe@octave.org>
date Wed, 18 Feb 2009 13:45:20 -0500
parents e9cb742df9eb
children 20dfb885f877
line wrap: on
line diff
--- a/liboctave/floatQR.cc
+++ b/liboctave/floatQR.cc
@@ -239,7 +239,7 @@
   if (u.rows () == m && v.rows () == n && u.cols () == v.cols ())
     {
       OCTAVE_LOCAL_BUFFER (float, w, 2*k);
-      for (octave_idx_type i = 0; i < u.cols (); i++)
+      for (volatile octave_idx_type i = 0; i < u.cols (); i++)
         {
           FloatColumnVector utmp = u.column (i), vtmp = v.column (i);
           F77_XFCN (sqr1up, SQR1UP, (m, n, k, q.fortran_vec (), m, r.fortran_vec (), k,
@@ -315,7 +315,7 @@
         }
 
       OCTAVE_LOCAL_BUFFER (float, w, kmax);
-      for (octave_idx_type i = 0; i < js.length (); i++)
+      for (volatile octave_idx_type i = 0; i < js.length (); i++)
         {
           FloatColumnVector utmp = u.column (jsi(i));
           F77_XFCN (sqrinc, SQRINC, (m, n + i, std::min (kmax, k + i), 
@@ -374,7 +374,7 @@
   else if (nj > 0)
     {
       OCTAVE_LOCAL_BUFFER (float, w, k);
-      for (octave_idx_type i = 0; i < js.length (); i++)
+      for (volatile octave_idx_type i = 0; i < js.length (); i++)
         {
           F77_XFCN (sqrdec, SQRDEC, (m, n - i, k == m ? k : k - i, 
                                      q.fortran_vec (), q.rows (),