Mercurial > hg > octave-lyh

changeset 5346:a103c41e68b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-05-10 09:41:38 by dbateman]
author dbateman
date Tue, 10 May 2005 09:41:38 +0000
parents 2781568bf951
children 679cc8fec408
files liboctave/CSparse.cc liboctave/ChangeLog liboctave/dSparse.cc
diffstat 3 files changed, 10 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/CSparse.cc
+++ b/liboctave/CSparse.cc
@@ -738,11 +738,11 @@
 		  
 		  UMFPACK_ZNAME (report_status) (control, status);
 		  UMFPACK_ZNAME (report_info) (control, info);
-		  
-		  UMFPACK_ZNAME (free_numeric) (&Numeric);
 		}
 	      else
 		retval = ComplexDET (d);
+		  
+	      UMFPACK_ZNAME (free_numeric) (&Numeric);
 	    }
 	}
     }
--- a/liboctave/ChangeLog
+++ b/liboctave/ChangeLog
@@ -1,3 +1,9 @@
+2005-05-10  David Bateman <dbateman@free.fr>
+
+	* dSparse.cc (determinant): Free numeric factorization after
+	sucessful calculation.
+	* CSparse.cc (determinant): ditto.
+
 2005-05-06  John W. Eaton  <jwe@octave.org>
 
 	* dbleCHOL.cc (CHOL::init): Use xelem instead of elem for indexing
--- a/liboctave/dSparse.cc
+++ b/liboctave/dSparse.cc
@@ -817,11 +817,11 @@
 		  
 		  UMFPACK_DNAME (report_status) (control, status);
 		  UMFPACK_DNAME (report_info) (control, info);
-
-		  UMFPACK_DNAME (free_numeric) (&Numeric);
 		}
 	      else
 		retval = DET (d);
+
+	      UMFPACK_DNAME (free_numeric) (&Numeric);
 	    }
 	}
     }