Mercurial > hg > octave-lojdl
changeset 1312:3a02b029b618
[project @ 1995-06-25 05:28:49 by jwe]
author | jwe |
---|---|
date | Sun, 25 Jun 1995 05:28:49 +0000 |
parents | b4586d676b7f |
children | f0dcdcc9a780 |
files | src/load-save.cc |
diffstat | 1 files changed, 3 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/src/load-save.cc +++ b/src/load-save.cc @@ -860,15 +860,9 @@ for (int j = 0; j < nc; j++) for (int i = 0; i < nr; i++) { - Complex val = m.elem (i, j); - - double r_val = real (val); - double i_val = imag (val); - - if (r_val > FLT_MAX - || i_val > FLT_MAX - || r_val < FLT_MIN - || i_val < FLT_MIN) + double val = m.elem (i, j); + + if (val > FLT_MAX || val < FLT_MIN) return 1; }