Mercurial > hg > octave-nkf

comparison src/pt-arg-list.cc @ 7336:745a8299c2b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-28 20:56:55 by jwe]
author jwe
date Fri, 28 Dec 2007 20:56:58 +0000
parents a1dbe9d80eee
children 7c020c067a60
comparison
equal deleted inserted replaced
7335:58f5fab3ebe5 7336:745a8299c2b5
252 252
253 return retval; 253 return retval;
254 } 254 }
255 255
256 tree_argument_list * 256 tree_argument_list *
257 tree_argument_list::dup (symbol_table *sym_tab) 257 tree_argument_list::dup (symbol_table::scope_id scope)
258 { 258 {
259 tree_argument_list *new_list = new tree_argument_list (); 259 tree_argument_list *new_list = new tree_argument_list ();
260 260
261 new_list->list_includes_magic_end = list_includes_magic_end; 261 new_list->list_includes_magic_end = list_includes_magic_end;
262 new_list->simple_assign_lhs = simple_assign_lhs; 262 new_list->simple_assign_lhs = simple_assign_lhs;
263 263
264 for (iterator p = begin (); p != end (); p++) 264 for (iterator p = begin (); p != end (); p++)
265 { 265 {
266 tree_expression *elt = *p; 266 tree_expression *elt = *p;
267 267
268 new_list->append (elt ? elt->dup (sym_tab) : 0); 268 new_list->append (elt ? elt->dup (scope) : 0);
269 } 269 }
270 270
271 return new_list; 271 return new_list;
272 } 272 }
273 273