--- a/src/pt-cell.cc	Thu Mar 05 09:37:59 2009 +0100
+++ b/src/pt-cell.cc	Thu Mar 05 13:50:25 2009 -0500
@@ -104,13 +104,13 @@
 
 tree_expression *
 tree_cell::dup (symbol_table::scope_id scope,
-		symbol_table::context_id context)
+		symbol_table::context_id context) const
 {
   tree_cell *new_cell = new tree_cell (0, line (), column ());
 
-  for (iterator p = begin (); p != end (); p++)
+  for (const_iterator p = begin (); p != end (); p++)
     {
-      tree_argument_list *elt = *p;
+      const tree_argument_list *elt = *p;
 
       new_cell->append (elt ? elt->dup (scope, context) : 0);
     }