- fix bootstrapping

(some bootstrapping bug here, see my comment inside the code) git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@18836 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Jan 29, 2014 · e9b98f0 · e9b98f0
1 parent 1ef176f
commit e9b98f0
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/Compiler/BackEnd/HpcOmTaskGraph.mo b/Compiler/BackEnd/HpcOmTaskGraph.mo
@@ -4417,7 +4417,8 @@ protected function getGraphComponents0 "author: marcusw
   output tuple<BackendDAE.StrongComponents, list<tuple<BackendDAE.EqSystem,Integer>>> oNodeComps_Mapping;
 
 protected
-  tuple<BackendDAE.StrongComponents, list<BackendDAE.EqSystem>> tmpNodeComps;
+  // TODO! FIXME: bootstrapping bug (duplicate components) with different type! 
+  // tuple<BackendDAE.StrongComponents, list<BackendDAE.EqSystem>> tmpNodeComps;
   BackendDAE.StrongComponents iNodeComps, tmpNodeComps;
   list<tuple<BackendDAE.EqSystem,Integer>> iCompsMapping, tmpCompsMapping;
 
@@ -4469,11 +4470,13 @@ protected
   list<tuple<BackendDAE.EqSystem,Integer>> eqSysts;
 
 algorithm
-  oComps := matchcontinue(nodeMark, systComps, iCompEqSysMapping, iNodeComps_Mapping)
+  oNodeComps_Mapping := matchcontinue(nodeMark, systComps, iCompEqSysMapping, iNodeComps_Mapping)
+
     case(_,_,_,(nodeIdx,(comps,eqSysts)))
       equation
         true = intGe(nodeMark,0);
       then ((nodeIdx+1,(comps,eqSysts)));
+
     case(_,_,_,(nodeIdx,(comps,eqSysts)))
       equation
         comp = arrayGet(systComps,nodeIdx);