# HG changeset patch
# User jwe
# Date 789769862 0
# Node ID 5dbaaa0b3d4666f63eadbc7af752853ae9908766
# Parent  7a632c749c6780b540585b34d5080a53885c7958
[project @ 1995-01-10 20:31:02 by jwe]

diff -r 7a632c749c67 -r 5dbaaa0b3d46 src/find.cc
--- a/src/find.cc	Mon Jan 09 18:58:33 1995 +0000
+++ b/src/find.cc	Tue Jan 10 20:31:02 1995 +0000
@@ -46,10 +46,11 @@
 	ColumnVector tmp (count);
 	for (int i = 0; i < count; i++)
 	  tmp (i) = nr * (j_idx (i) - 1.0) + i_idx (i);
-	retval(0) = tree_constant (tmp, 1);
-// If you want this to work more like Matlab, use the following line
-// instead of the previous one.
-//	retval(0) = tree_constant (tmp, (nr != 1));
+
+// If the original argument was a row vector, force a row vector of
+// indices to be returned.
+
+	retval(0) = tree_constant (tmp, (nr != 1));
       }
       break;