Mercurial > octave-libgccjit

comparison src/pt-stmt.cc @ 8913:35cd375d4bb3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
make tree::dup functions const
author John W. Eaton <jwe@octave.org>
date Thu, 05 Mar 2009 13:50:25 -0500
parents c84a5b6377c4
children eb63fbe60fab
comparison
equal deleted inserted replaced
8912:57c3155754d6 8913:35cd375d4bb3
131 return retval; 131 return retval;
132 } 132 }
133 133
134 tree_statement * 134 tree_statement *
135 tree_statement::dup (symbol_table::scope_id scope, 135 tree_statement::dup (symbol_table::scope_id scope,
136 symbol_table::context_id context) 136 symbol_table::context_id context) const
137 { 137 {
138 tree_statement *new_stmt = new tree_statement (); 138 tree_statement *new_stmt = new tree_statement ();
139 139
140 new_stmt->cmd = cmd ? cmd->dup (scope, context) : 0; 140 new_stmt->cmd = cmd ? cmd->dup (scope, context) : 0;
141 141
192 return tbp.get_list (); 192 return tbp.get_list ();
193 } 193 }
194 194
195 tree_statement_list * 195 tree_statement_list *
196 tree_statement_list::dup (symbol_table::scope_id scope, 196 tree_statement_list::dup (symbol_table::scope_id scope,
197 symbol_table::context_id context) 197 symbol_table::context_id context) const
198 { 198 {
199 tree_statement_list *new_list = new tree_statement_list (); 199 tree_statement_list *new_list = new tree_statement_list ();
200 200
201 new_list->function_body = function_body; 201 new_list->function_body = function_body;
202 202
203 for (iterator p = begin (); p != end (); p++) 203 for (const_iterator p = begin (); p != end (); p++)
204 { 204 {
205 tree_statement *elt = *p; 205 const tree_statement *elt = *p;
206 206
207 new_list->append (elt ? elt->dup (scope, context) : 0); 207 new_list->append (elt ? elt->dup (scope, context) : 0);
208 } 208 }
209 209
210 return new_list; 210 return new_list;