--- a/stage4/generate_c/generate_c_inlinefcall.cc Fri Jun 10 08:47:38 2011 +0100
+++ b/stage4/generate_c/generate_c_inlinefcall.cc Tue Jun 14 14:53:37 2011 +0100
@@ -312,7 +312,7 @@
case complextype_suffix_vg:
symbol->subscripted_variable->accept(*this);
- current_array_type = search_varfb_instance_type->get_rawtype(symbol->subscripted_variable);
+ current_array_type = search_varfb_instance_type->get_type_id(symbol->subscripted_variable);
if (current_array_type == NULL) ERROR;
s4o.print(".table");