- Attempt to keep RML happy.

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@20051 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Apr 8, 2014 · b67654f · b67654f
1 parent 0d2aecd
commit b67654f
Showing 1 changed file with 11 additions and 3 deletions.
diff --git a/Compiler/FrontEnd/ComponentReference.mo b/Compiler/FrontEnd/ComponentReference.mo
@@ -1787,13 +1787,21 @@ algorithm
       Integer idx;
 
     case (_, DAE.CREF_QUAL(id, ty, subs, cr))
-      then DAE.CREF_QUAL(stringAppend(id, inString), ty, subs, cr);
+      equation
+        id = stringAppend(id, inString);
+      then DAE.CREF_QUAL(id, ty, subs, cr);
 
     case (_, DAE.CREF_IDENT(id, ty, subs))
-      then DAE.CREF_IDENT(stringAppend(id, inString), ty, subs);
+      equation
+        id = stringAppend(id, inString);
+      then
+        DAE.CREF_IDENT(id, ty, subs);
 
     case (_, DAE.CREF_ITER(id, idx, ty, subs))
-      then DAE.CREF_ITER(stringAppend(id, inString), idx, ty, subs);
+      equation
+        id = stringAppend(id, inString);
+      then
+        DAE.CREF_ITER(id, idx, ty, subs);
 
   end match;
 end appendStringFirstIdent;