Mercurial > hg > octave-nkf

diff liboctave/oct-norm.cc @ 10142:829e69ec3110

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
make OCTAVE_QUIT a function
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 20 Jan 2010 10:38:00 +0100
parents 16f53d29049f
children fa01c1670b3e
line wrap: on
line diff
--- a/liboctave/oct-norm.cc
+++ b/liboctave/oct-norm.cc
@@ -413,7 +413,7 @@
   RR lambda = 0, mu = 0;
   for (octave_idx_type k = 0; k < m.columns (); k++)
     {
-      OCTAVE_QUIT;
+      octave_quit ();
       VectorT col (m.column (k));
       if (k > 0)
         higham_subp (y, col, 4*k, p, lambda, mu);
@@ -431,7 +431,7 @@
   int iter = 0;
   while (iter < maxiter)
     {
-      OCTAVE_QUIT;
+      octave_quit ();
       y = m*x;
       gamma1 = gamma;
       gamma = vector_norm (y, p);