Mercurial > hg > octave-lyh

changeset 531:1be78be437c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-07-20 19:44:13 by jwe]
author jwe
date Wed, 20 Jul 1994 19:47:27 +0000
parents c3268005bf98
children 2ca256b77602
files liboctave/Array.cc src/pt-const.cc src/pt-exp-base.cc
diffstat 3 files changed, 5 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/Array.cc
+++ b/liboctave/Array.cc
@@ -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
--- a/src/pt-const.cc
+++ b/src/pt-const.cc
@@ -44,7 +44,7 @@
   if (--rep->count <= 0)
     {
       delete rep;
-      rep = (tree_constant_rep *) NULL;
+      rep = 0;
     }
 }
 
--- a/src/pt-exp-base.cc
+++ b/src/pt-exp-base.cc
@@ -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)