Mercurial > octave-nkf

diff src/DLD-FUNCTIONS/sort.cc @ 5360:33adb987c033

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-05-23 16:19:56 by jwe]
author jwe
date Mon, 23 May 2005 16:19:56 +0000
parents 4c8a2e4e0717
children 4229d6801f23
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/sort.cc	Sat May 21 08:31:52 2005 +0000
+++ b/src/DLD-FUNCTIONS/sort.cc	Mon May 23 16:19:56 2005 +0000
@@ -87,7 +87,7 @@
   octave_value retval;
 
   if (m.length () < 1)
-    return retval;
+    return ArrayN<T> ();
 
   dim_vector dv = m.dims ();
   octave_idx_type ns = dv(dim);
@@ -148,7 +148,11 @@
   octave_value_list retval;
 
   if (m.length () < 1)
-    return retval;
+    {
+      retval(1) = NDArray ();
+      retval(0) = ArrayN<T> ();
+      return retval;
+    }
 
   dim_vector dv = m.dims ();
   octave_idx_type ns = dv(dim);
@@ -296,7 +300,7 @@
   octave_value retval;
 
   if (m.length () < 1)
-    return retval;
+    return ArrayN<double> ();
 
   dim_vector dv = m.dims ();
   octave_idx_type ns = dv(dim);
@@ -433,7 +437,11 @@
   octave_value_list retval;
 
   if (m.length () < 1)
-    return retval;
+    {
+      retval(1) = ArrayN<double> ();
+      retval(0) = NDArray ();
+      return retval;
+    }
 
   dim_vector dv = m.dims ();
   octave_idx_type ns = dv(dim);