# HG changeset patch
# User Jordi Gutiérrez Hermoso <jordigh@octave.org>
# Date 1388675556 18000
# Node ID c0f036b5e292dd46e842b412155e0145e7ba7f43
# Parent  8f256148d82b82e6ab9a401dea24b8982f74c9a2
Finv: define xrcond correctly for float matrices (bug #41065)

diff -r 8f256148d82b -r c0f036b5e292 libinterp/corefcn/inv.cc
--- a/libinterp/corefcn/inv.cc	Tue Jan 07 16:07:54 2014 -0500
+++ b/libinterp/corefcn/inv.cc	Thu Jan 02 10:12:36 2014 -0500
@@ -213,7 +213,7 @@
 
       retval(0) = result;
 
-      volatile double xrcond = rcond;
+      volatile double xrcond = isfloat ? frcond : rcond;
       xrcond += 1.0;
       if (nargout < 2 && (info == -1 || xrcond == 1.0))
         warning ("inverse: matrix singular to machine precision, rcond = %g",