From ee71ffb151606611a5e4341bc250a5bc552a1408 Mon Sep 17 00:00:00 2001
From: Volker Waurich <volker3189@gmx.de>
Date: Wed, 11 Dec 2013 09:38:40 +0000
Subject: [PATCH] - fixed bug for varSCCmapping concerning tornsystems
 including records

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@18459 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
---
 Compiler/BackEnd/HpcOmTaskGraph.mo | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/Compiler/BackEnd/HpcOmTaskGraph.mo b/Compiler/BackEnd/HpcOmTaskGraph.mo
index c00ab158625..3dcd6a9765c 100644
--- a/Compiler/BackEnd/HpcOmTaskGraph.mo
+++ b/Compiler/BackEnd/HpcOmTaskGraph.mo
@@ -1579,7 +1579,7 @@ end createSccMapping0;
 
 
 protected function othersInTearComp " gets the remaining algebraic vars and equations from the torn block.
-this function is just for checking if there exists an equation with more than one var(because i dont know why theres a list of vars)
+Remark: there can be more than 1 var per equation.
 author:Waurich TUD 2013-06"
   input tuple<Integer,list<Integer>> otherEqnVarTpl;
   input tuple<list<Integer>,list<Integer>> othersIn;
@@ -1595,10 +1595,9 @@ algorithm
     case(_,_)
       equation
       (eq,varTplLst)=otherEqnVarTpl;  
-      true = intEq(listLength(varTplLst),1);
       var = listGet(varTplLst,1);
       (eqLst,varLst) = othersIn;
-      varLst = var::varLst;
+      varLst = listAppend(varTplLst,varLst);
       eqLst = eq::eqLst;
       then
         ((eqLst,varLst));