Mercurial > hg > octave-nkf
diff src/pr-output.cc @ 4153:6b96ce9f5743
[project @ 2002-11-06 20:38:49 by jwe]
author | jwe |
---|---|
date | Wed, 06 Nov 2002 20:38:50 +0000 |
parents | b79da8779a0e |
children | e96f52432059 |
line wrap: on
line diff
--- a/src/pr-output.cc +++ b/src/pr-output.cc @@ -41,6 +41,7 @@ #include "lo-sstream.h" #include "mach-info.h" #include "oct-cmplx.h" +#include "quit.h" #include "str-vec.h" #include "Cell.h" @@ -1311,6 +1312,8 @@ { for (int j = 0; j < nc; j++) { + OCTAVE_QUIT; + if (j == 0) os << " "; @@ -1370,6 +1373,8 @@ for (int j = col; j < lim; j++) { + OCTAVE_QUIT; + if (i == 0 && j == 0) os << "[ "; else @@ -1414,6 +1419,8 @@ for (int j = col; j < lim; j++) { + OCTAVE_QUIT; + os << " "; pr_float (os, m(i,j), fw, scale); @@ -1479,6 +1486,8 @@ { for (int j = 0; j < nc; j++) { + OCTAVE_QUIT; + if (j == 0) os << " "; @@ -1539,6 +1548,8 @@ for (int j = col; j < lim; j++) { + OCTAVE_QUIT; + if (i == 0 && j == 0) os << "[ "; else @@ -1583,6 +1594,8 @@ for (int j = col; j < lim; j++) { + OCTAVE_QUIT; + os << " "; pr_complex (os, cm(i,j), r_fw, i_fw, scale); @@ -1610,6 +1623,8 @@ os << " "; for (int i = 0; i < num_elem; i++) { + OCTAVE_QUIT; + double val = base + i * increment; if (val == 0.0) os << " "; @@ -1683,6 +1698,8 @@ for (int i = col; i < lim; i++) { + OCTAVE_QUIT; + double val = base + i * increment; os << " "; @@ -1725,6 +1742,8 @@ { for (int i = 0; i < nstr; i++) { + OCTAVE_QUIT; + std::string row = chm.row_as_string (i); if (pr_as_read_syntax)