# HG changeset patch
# User jwe
# Date 830547265 0
# Node ID 431257d0cdacec09b8f10ba6b85a5cee232296ab
# Parent  4dcc8b77e84aea3ee21144912ba9529ba96325b9
[project @ 1996-04-26 19:34:25 by jwe]

diff --git a/src/pt-const.cc b/src/pt-const.cc
--- a/src/pt-const.cc
+++ b/src/pt-const.cc
@@ -2943,6 +2943,12 @@
 	      error ("can't index %s variables", type_as_string ());
 	      break;
 	    }
+
+	  // We may have converted this value from a scalar to a
+	  // matrix to allow indexing to work.
+
+	  if (! error_state)
+	    maybe_mutate ();
 	}
     }