Mercurial > hg > octave-lyh
comparison src/pt-cell.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 | 2c9b89b6b919 |
comparison
equal
deleted
inserted
replaced
5860:b645066d40ad | 5861:2a6cb4ed8f1e |
---|---|
99 retval = rvalue (); | 99 retval = rvalue (); |
100 | 100 |
101 return retval; | 101 return retval; |
102 } | 102 } |
103 | 103 |
104 tree_expression * | |
105 tree_cell::dup (symbol_table *sym_tab) | |
106 { | |
107 tree_cell *new_cell = new tree_cell (0, line (), column ()); | |
108 | |
109 for (iterator p = begin (); p != end (); p++) | |
110 { | |
111 tree_argument_list *elt = *p; | |
112 | |
113 append (elt ? elt->dup (sym_tab) : 0); | |
114 } | |
115 | |
116 new_cell->copy_base (*this); | |
117 | |
118 return new_cell; | |
119 } | |
120 | |
104 void | 121 void |
105 tree_cell::accept (tree_walker& tw) | 122 tree_cell::accept (tree_walker& tw) |
106 { | 123 { |
107 tw.visit_cell (*this); | 124 tw.visit_cell (*this); |
108 } | 125 } |