# HG changeset patch
# User jwe
# Date 774733647 0
# Node ID 1be78be437c79b82ec2a086a4d98fe2e72ab492b
# Parent  c3268005bf98e8439d46fc084d1d7c226f2b3537
[project @ 1994-07-20 19:44:13 by jwe]

diff -r c3268005bf98 -r 1be78be437c7 liboctave/Array.cc
--- a/liboctave/Array.cc	Wed Jul 20 19:26:33 1994 +0000
+++ b/liboctave/Array.cc	Wed Jul 20 19:47:27 1994 +0000
@@ -998,6 +998,9 @@
 typedef Array2<Complex> array2_type_complex;
 typedef DiagArray<Complex> diag_array_type_complex;
 
+#include "tree-const.h"
+typedef Array<tree_constant> array_type_tree_constant;
+
 #elif defined (USER_TYPEDEFS)
 
 // Users can generate their own .o files with their own types, as many
diff -r c3268005bf98 -r 1be78be437c7 src/pt-const.cc
--- a/src/pt-const.cc	Wed Jul 20 19:26:33 1994 +0000
+++ b/src/pt-const.cc	Wed Jul 20 19:47:27 1994 +0000
@@ -44,7 +44,7 @@
   if (--rep->count <= 0)
     {
       delete rep;
-      rep = (tree_constant_rep *) NULL;
+      rep = 0;
     }
 }
 
diff -r c3268005bf98 -r 1be78be437c7 src/pt-exp-base.cc
--- a/src/pt-exp-base.cc	Wed Jul 20 19:26:33 1994 +0000
+++ b/src/pt-exp-base.cc	Wed Jul 20 19:47:27 1994 +0000
@@ -221,8 +221,7 @@
 	    retval = retval->chain (id);
 	}
       else if (elem->is_index_expression ())
-//	       && (((tree_index_expression *) elem) -> arg_list ()
-//		   == (tree_argument_list *) NULL))
+//	       && ! ((tree_index_expression *) elem) -> arg_list ())
 	{
 	  tree_index_expression *idx_expr = (tree_index_expression *) elem;
 	  if (list == this)