Mercurial > hg > octave-lojdl
changeset 931:0494ae4d384c
[project @ 1994-11-16 15:26:09 by jwe]
author | jwe |
---|---|
date | Wed, 16 Nov 1994 15:26:09 +0000 |
parents | b02124748d40 |
children | 1c9812d0cf59 |
files | src/xdiv.cc |
diffstat | 1 files changed, 10 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xdiv.cc +++ b/src/xdiv.cc @@ -41,8 +41,16 @@ if (info == -2) { - error ("matrix singular to machine precision, rcond = %g", rcond); - return 0; + if (warn) + { + warning ("matrix singular to machine precision, rcond = %g", rcond); + return 1; + } + else + { + error ("matrix singular to machine precision, rcond = %g", rcond); + return 0; + } } else return 1;