# HG changeset patch
# User Laurent Bessard
# Date 1343489937 -7200
# Node ID 3e21d98d0a7153f41f14d93f04bb0db1a7a76151
# Parent  c6486bd97392655e19a68d80e3c970427e67b258
Fix bug while using complex type variables in Function and FunctionBlock interface

diff -r c6486bd97392 -r 3e21d98d0a71 stage4/generate_c/generate_c_il.cc
--- a/stage4/generate_c/generate_c_il.cc	Fri Jul 27 15:43:32 2012 +0200
+++ b/stage4/generate_c/generate_c_il.cc	Sat Jul 28 17:38:57 2012 +0200
@@ -661,13 +661,17 @@
       }
       break;
     case complextype_suffix_vg:
-    case assignment_vg:
-      symbol->record_variable->accept(*this);
-      if (type_is_complex) {
-        s4o.print(".");
-        symbol->field_selector->accept(*this);
-      }
-      break;
+	  symbol->record_variable->accept(*this);
+	  if (type_is_complex) {
+		s4o.print(".");
+		symbol->field_selector->accept(*this);
+	  }
+	  break;
+	case assignment_vg:
+	  symbol->record_variable->accept(*this);
+	  s4o.print(".");
+	  symbol->field_selector->accept(*this);
+	  break;
     default:
       if (this->is_variable_prefix_null()) {
     	symbol->record_variable->accept(*this);
diff -r c6486bd97392 -r 3e21d98d0a71 stage4/generate_c/generate_c_st.cc
--- a/stage4/generate_c/generate_c_st.cc	Fri Jul 27 15:43:32 2012 +0200
+++ b/stage4/generate_c/generate_c_st.cc	Sat Jul 28 17:38:57 2012 +0200
@@ -324,13 +324,17 @@
       }
       break;
     case complextype_suffix_vg:
-    case assignment_vg:
       symbol->record_variable->accept(*this);
       if (type_is_complex) {
         s4o.print(".");
         symbol->field_selector->accept(*this);
       }
       break;
+    case assignment_vg:
+      symbol->record_variable->accept(*this);
+      s4o.print(".");
+      symbol->field_selector->accept(*this);
+      break;
     default:
       if (this->is_variable_prefix_null()) {
     	symbol->record_variable->accept(*this);