# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1248374276 -7200
# Node ID 5fcf008c7c4148a2fd29a7788fedd9b1594cee66
# Parent  deb668d53e608f77d60c35a06a1ce5c58f78e5ad
fix Cholesky updating with scalars

diff -r deb668d53e60 -r 5fcf008c7c41 src/ChangeLog
--- a/src/ChangeLog	Thu Jul 23 14:24:45 2009 -0400
+++ b/src/ChangeLog	Thu Jul 23 20:37:56 2009 +0200
@@ -1,3 +1,9 @@
+2009-07-23  Jaroslav Hajek  <highegg@gmail.com>
+
+	* DLD-FUNCTIONS/chol.cc (Fcholupdate,
+	Fcholinsert, Fcholdelete, Fcholshift): Replace is_matrix_type ->
+	is_numeric_type.
+
 2009-07-23  John W. Eaton  <jwe@octave.org>
 
 	* toplev.cc (IGNORE_EXCEPTION, SAFE_CALL): New macros.
diff -r deb668d53e60 -r 5fcf008c7c41 src/DLD-FUNCTIONS/chol.cc
--- a/src/DLD-FUNCTIONS/chol.cc	Thu Jul 23 14:24:45 2009 -0400
+++ b/src/DLD-FUNCTIONS/chol.cc	Thu Jul 23 20:37:56 2009 +0200
@@ -619,7 +619,7 @@
   octave_value argr = args(0);
   octave_value argu = args(1);
 
-  if (argr.is_matrix_type () && argu.is_matrix_type ()
+  if (argr.is_numeric_type () && argu.is_numeric_type ()
       && (nargin < 3 || args(2).is_string ()))
     {
       octave_idx_type n = argr.rows ();
@@ -830,7 +830,7 @@
   octave_value argj = args(1);
   octave_value argu = args(2);
 
-  if (argr.is_matrix_type () && argu.is_matrix_type ()
+  if (argr.is_numeric_type () && argu.is_numeric_type ()
       && argj.is_real_scalar ())
     {
       octave_idx_type n = argr.rows ();
@@ -1003,7 +1003,7 @@
   octave_value argr = args(0);
   octave_value argj = args(1);
 
-  if (argr.is_matrix_type () && argj.is_real_scalar ())
+  if (argr.is_numeric_type () && argj.is_real_scalar ())
     {
       octave_idx_type n = argr.rows ();
       octave_idx_type j = argj.scalar_value ();
@@ -1141,7 +1141,7 @@
   octave_value argi = args(1);
   octave_value argj = args(2);
 
-  if (argr.is_matrix_type () && argi.is_real_scalar () && argj.is_real_scalar ())
+  if (argr.is_numeric_type () && argi.is_real_scalar () && argj.is_real_scalar ())
     {
       octave_idx_type n = argr.rows ();
       octave_idx_type i = argi.scalar_value ();