# HG changeset patch
# User jwe
# Date 813727754 0
# Node ID 562fed28ce2238ef378b5610ed4bc6882fbdfe43
# Parent  1cff14ab83a482c0505d4ac50e30ba63e55f8f73
[project @ 1995-10-15 03:29:14 by jwe]

diff --git a/src/sort.cc b/src/sort.cc
--- a/src/sort.cc
+++ b/src/sort.cc
@@ -164,7 +164,14 @@
   Matrix ms (nr, nc);
   Matrix idx (nr, nc);
 
-  if (nr > 0 && nc > 0)
+  if (nr == 1 && nc > 0)
+    {
+      retval (1) = Matrix (nr, nc, 1.0);
+      retval (0) = m;
+
+      return retval;
+    }
+  else if (nr > 1 && nc > 0)
     {
       for (int j = 0; j < nc; j++)
 	{
@@ -192,7 +199,14 @@
   RowVector vs (n);
   RowVector idx (n);
 
-  if (n > 0)
+  if (n == 1)
+    {
+      retval (1) = RowVector (n, 1.0);
+      retval (0) = v;
+
+      return retval;
+    }
+  else if (n > 1)
     {
       Array<int> l = create_index_array (n);
 
@@ -218,7 +232,14 @@
   ComplexMatrix cms (nr, nc);
   Matrix idx (nr, nc);
 
-  if (nr > 0 && nc > 0)
+  if (nr == 1 && nc > 0)
+    {
+      retval (1) = Matrix (nr, nc, 1.0);
+      retval (0) = cm;
+
+      return retval;
+    }
+  else if (nr > 1 && nc > 0)
     {
       for (int j = 0; j < nc; j++)
 	{
@@ -256,7 +277,14 @@
   ComplexRowVector cvs (n);
   RowVector idx (n);
 
-  if (n > 0)
+  if (n == 1)
+    {
+      retval (1) = RowVector (n, 1.0);
+      retval (0) = cv;
+
+      return retval;
+    }
+  else if (n > 1)
     {
       Array<int> l = create_index_array (n);