diff src/pt-loop.cc @ 7336:745a8299c2b5

[project @ 2007-12-28 20:56:55 by jwe]
author jwe
date Fri, 28 Dec 2007 20:56:58 +0000
parents a1dbe9d80eee
children 360b4f7684fd
line wrap: on
line diff
--- a/src/pt-loop.cc
+++ b/src/pt-loop.cc
@@ -126,10 +126,10 @@
 }
 
 tree_command *
-tree_while_command::dup (symbol_table *sym_tab)
+tree_while_command::dup (symbol_table::scope_id scope)
 {
-  return new tree_while_command (expr ? expr->dup (sym_tab) : 0,
-				 list ? list->dup (sym_tab) : 0,
+  return new tree_while_command (expr ? expr->dup (scope) : 0,
+				 list ? list->dup (scope) : 0,
 				 lead_comm ? lead_comm->dup () : 0,
 				 trail_comm ? trail_comm->dup (): 0,
 				 line (), column ());
@@ -189,10 +189,10 @@
 }
 
 tree_command *
-tree_do_until_command::dup (symbol_table *sym_tab)
+tree_do_until_command::dup (symbol_table::scope_id scope)
 {
-  return new tree_do_until_command (expr ? expr->dup (sym_tab) : 0,
-				    list ? list->dup (sym_tab) : 0,
+  return new tree_do_until_command (expr ? expr->dup (scope) : 0,
+				    list ? list->dup (scope) : 0,
 				    lead_comm ? lead_comm->dup () : 0,
 				    trail_comm ? trail_comm->dup (): 0,
 				    line (), column ());
@@ -487,11 +487,11 @@
 }
 
 tree_command *
-tree_simple_for_command::dup (symbol_table *sym_tab)
+tree_simple_for_command::dup (symbol_table::scope_id scope)
 {
-  return new tree_simple_for_command (lhs ? lhs->dup (sym_tab) : 0,
-				      expr ? expr->dup (sym_tab) : 0,
-				      list ? list->dup (sym_tab) : 0,
+  return new tree_simple_for_command (lhs ? lhs->dup (scope) : 0,
+				      expr ? expr->dup (scope) : 0,
+				      list ? list->dup (scope) : 0,
 				      lead_comm ? lead_comm->dup () : 0,
 				      trail_comm ? trail_comm->dup () : 0,
 				      line (), column ());
@@ -608,11 +608,11 @@
 }
 
 tree_command *
-tree_complex_for_command::dup (symbol_table *sym_tab)
+tree_complex_for_command::dup (symbol_table::scope_id scope)
 {
-  return new tree_complex_for_command (lhs ? lhs->dup (sym_tab) : 0,
-				      expr ? expr->dup (sym_tab) : 0,
-				      list ? list->dup (sym_tab) : 0,
+  return new tree_complex_for_command (lhs ? lhs->dup (scope) : 0,
+				      expr ? expr->dup (scope) : 0,
+				      list ? list->dup (scope) : 0,
 				      lead_comm ? lead_comm->dup () : 0,
 				      trail_comm ? trail_comm->dup () : 0,
 				      line (), column ());