diff src/pt-binop.cc @ 5861:2a6cb4ed8f1e

[project @ 2006-06-16 05:09:41 by jwe]
author jwe
date Fri, 16 Jun 2006 05:09:42 +0000
parents 4c8a2e4e0717
children 93c65f2a5668
line wrap: on
line diff
--- a/src/pt-binop.cc	Fri Jun 16 05:01:39 2006 +0000
+++ b/src/pt-binop.cc	Fri Jun 16 05:09:42 2006 +0000
@@ -105,6 +105,19 @@
   return octave_value::binary_op_as_string (etype);
 }
 
+tree_expression *
+tree_binary_expression::dup (symbol_table *sym_tab)
+{
+  tree_binary_expression *new_be
+    = new tree_binary_expression (op_lhs ? op_lhs->dup (sym_tab) : 0,
+				  op_rhs ? op_rhs->dup (sym_tab) : 0,
+				  line (), column (), etype);
+
+  new_be->copy_base (*this);
+
+  return new_be;
+}
+
 void
 tree_binary_expression::accept (tree_walker& tw)
 {
@@ -219,6 +232,19 @@
   return retval;
 }
 
+tree_expression *
+tree_boolean_expression::dup (symbol_table *sym_tab)
+{
+  tree_boolean_expression *new_be
+    = new tree_boolean_expression (op_lhs ? op_lhs->dup (sym_tab) : 0,
+				   op_rhs ? op_rhs->dup (sym_tab) : 0,
+				   line (), column (), etype);
+
+  new_be->copy_base (*this);
+
+  return new_be;
+}
+
 /*
 ;;; Local Variables: ***
 ;;; mode: C++ ***