diff -r f332b62cd2c1 -r c6aed7e5f070 stage4/generate_c/generate_var_list.cc
--- a/stage4/generate_c/generate_var_list.cc	Tue Dec 01 09:03:33 2009 +0100
+++ b/stage4/generate_c/generate_var_list.cc	Wed Dec 02 16:11:01 2009 +0100
@@ -280,7 +280,7 @@
       update_var_type_symbol(symbol->array_spec_init);
       
       this->current_var_type_category = array_vtc;
-      declare_variables(symbol->var1_list);
+      //declare_variables(symbol->var1_list);
     
       /* Values no longer in scope, and therefore no longer used.
        * Make an effort to keep them set to NULL when not in use
@@ -305,7 +305,7 @@
       update_var_type_symbol(symbol->initialized_structure);
     
       /* now to produce the c equivalent... */
-      declare_variables(symbol->var1_list);
+      //declare_variables(symbol->var1_list);
     
       /* Values no longer in scope, and therefore no longer used.
        * Make an effort to keep them set to NULL when not in use