diff -r 0c2ef191b22a -r d48f53715f77 stage4/generate_c/generate_c_sfc.cc
--- a/stage4/generate_c/generate_c_sfc.cc	Wed Feb 01 13:01:08 2012 +0000
+++ b/stage4/generate_c/generate_c_sfc.cc	Wed Feb 01 19:49:11 2012 +0000
@@ -844,7 +844,7 @@
         for(pt = variable_list.begin(); pt != variable_list.end(); pt++) {
           symbol_c *var_decl = search_var_instance_decl->get_decl(pt->symbol);
           if (var_decl != NULL) {
-            unsigned int vartype = search_var_instance_decl->get_vartype();
+            unsigned int vartype = search_var_instance_decl->get_vartype(pt->symbol);
 
             s4o.print(s4o.indent_spaces);
             if (vartype == search_var_instance_decl_c::external_vt)