# HG changeset patch
# User jwe
# Date 763887887 0
# Node ID dd2a919873e8d2dc54047fdfd3415d072247f2b4
# Parent  c6eea89a2f09b07b78ff372ba3ced827e9bb8ea3
[project @ 1994-03-17 07:04:47 by jwe]

diff -r c6eea89a2f09 -r dd2a919873e8 src/tc-index.cc
--- a/src/tc-index.cc	Tue Mar 15 23:21:56 1994 +0000
+++ b/src/tc-index.cc	Thu Mar 17 07:04:47 1994 +0000
@@ -79,8 +79,9 @@
 		if (len == j.ones_count ())
 		  cols = len;
 	      }
-	    else if (args[2].is_scalar_type ()
-		     && NINT (args[2].double_value ()) == 1)
+	    else if (args[2].const_type () == magic_colon
+		     || (args[2].is_scalar_type ()
+			 && NINT (args[2].double_value ()) == 1))
 	      {
 		cols = 1;
 	      }
@@ -102,8 +103,9 @@
 		if (len == i.ones_count ())
 		  rows = len;
 	      }
-	    else if (args[1].is_scalar_type ()
-		     && NINT (args[1].double_value ()) == 1)
+	    else if (args[1].const_type () == magic_colon
+		     || (args[1].is_scalar_type ()
+			 && NINT (args[1].double_value ()) == 1))
 	      {
 		rows = 1;
 	      }