Mercurial > octave

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-06-16 05:09:41 by jwe]
author jwe
date Fri, 16 Jun 2006 05:09:42 +0000
parents ace8d8d26933
children e884ab4f29ee
line wrap: on
line diff
--- a/src/pt-id.cc	Fri Jun 16 05:01:39 2006 +0000
+++ b/src/pt-id.cc	Fri Jun 16 05:09:42 2006 +0000
@@ -212,6 +212,18 @@
   return sym->variable_reference ();
 }
 
+tree_identifier *
+tree_identifier::dup (symbol_table *sym_tab)
+{
+  symbol_record *sr = (sym_tab && sym) ? sym_tab->lookup (sym->name ()) : 0;
+
+  tree_identifier *new_id = new tree_identifier (sr, line (), column ());
+
+  new_id->copy_base (*this);
+
+  return new_id;
+}
+
 void
 tree_identifier::accept (tree_walker& tw)
 {