# HG changeset patch
# User jwe
# Date 809228158 0
# Node ID c04c2a6849e8008b340b348081a9d5d9a41a4815
# Parent  41c6ffb66c01a06c2ec1a5a64dd352f63e9e5758
[project @ 1995-08-24 01:35:58 by jwe]

diff -r 41c6ffb66c01 -r c04c2a6849e8 src/pt-const.cc
--- a/src/pt-const.cc	Thu Aug 24 01:12:31 1995 +0000
+++ b/src/pt-const.cc	Thu Aug 24 01:35:58 1995 +0000
@@ -4930,6 +4930,11 @@
 	      ::error ("A(matrix) = X: where A is a column vector, X must also be a");
 	      ::error ("column vector with the same number of elements as matrix");
 	    }
+	  else if (nr == 0 || nc == 0)
+	    {
+	      ::error ("A(matrix) = X: X must be a vector with the same");
+	      ::error ("number of elements as matrix");
+	    }
 	  else
 	    panic_impossible ();
 	}
@@ -5017,6 +5022,11 @@
 	  ::error ("A(range) = X: where A is a column vector, X must also be a");
 	  ::error ("column vector with the same number of elements as range");
 	}
+      else if (nr == 0 || nc == 0)
+	{
+	  ::error ("A(range) = X: X must be a vector with the same");
+	  ::error ("number of elements as range");
+	}
       else
 	panic_impossible ();
     }