# HG changeset patch
# User jwe
# Date 797130787 0
# Node ID ee2c6a67abe985851c094edfb75b4bbadf629563
# Parent  dc7a13bed72292dcac53c0e4c9f36017cfd65789
[project @ 1995-04-06 01:12:06 by jwe]

diff -r dc7a13bed722 -r ee2c6a67abe9 src/pt-exp-base.cc
--- a/src/pt-exp-base.cc	Tue Apr 04 19:25:21 1995 +0000
+++ b/src/pt-exp-base.cc	Thu Apr 06 01:13:07 1995 +0000
@@ -120,18 +120,12 @@
   int pad_after = 0;
   if (user_pref.print_answer_id_name)
     {
-      if (print_as_scalar (tc))
+      if (print_as_scalar (tc) || print_as_structure (tc))
 	{
 	  ostrstream output_buf;
 	  output_buf << name << " = " << ends;
 	  maybe_page_output (output_buf);
 	}
-      else if (print_as_structure (tc))
-	{
-	  ostrstream output_buf;
-	  output_buf << name << " = {\n" << ends;
-	  maybe_page_output (output_buf);
-	}
       else
 	{
 	  pad_after = 1;
@@ -1935,8 +1929,7 @@
 	}
     }
 
-  if (! error_state && print && retval.is_defined ()
-      && user_pref.print_answer_id_name) 
+  if (! error_state && print && retval.is_defined ())
     print_constant (retval, lhs->name ());
 
   return retval;
@@ -2070,7 +2063,7 @@
 		  maybe_page_output (output_buf);
 		}
 
-	      if (print && user_pref.print_answer_id_name)
+	      if (print)
 		print_constant (results(i), lhs_expr->name (), 0);
 
 	      pad_after++;
diff -r dc7a13bed722 -r ee2c6a67abe9 src/symtab.cc
--- a/src/symtab.cc	Tue Apr 04 19:25:21 1995 +0000
+++ b/src/symtab.cc	Thu Apr 06 01:13:07 1995 +0000
@@ -401,7 +401,6 @@
     {
 // Would be nice to be able to avoid this cast.  XXX FIXME XXX
       definition->define ((tree_constant *) saved_def);
-      delete t;
       return 0;
     }