Skip to content

Commit

Permalink
- fixed graphMLDump of equationSystems
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@18597 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
Volker Waurich committed Jan 8, 2014
1 parent a946014 commit 786fe41
Showing 1 changed file with 8 additions and 2 deletions.
10 changes: 8 additions & 2 deletions Compiler/BackEnd/HpcOmEqSystems.mo
Expand Up @@ -1921,12 +1921,15 @@ protected
BackendDAE.Var var;
Integer nameAttrIdx,typeAttIdx;
String varString, varNodeId;
list<String> varChars;
algorithm
nameAttrIdx := listGet(attributeIdcs,1);
typeAttIdx := listGet(attributeIdcs,2); // if its a tearingvar or residual or an other
var := BackendVariable.getVarAt(vars,indx);
varString := BackendDump.varString(var);
varString := HpcOmTaskGraph.prepareXML(varString);
varChars := stringListStringChar(varString);
varChars := List.map(varChars,HpcOmTaskGraph.prepareXML);
varString := stringCharListString(varChars);
varNodeId := getVarNodeIdx(indx);
graphOut := GraphML.addNode(varNodeId,intString(indx),GraphML.COLOR_ORANGE,GraphML.ELLIPSE(),SOME(varString),{(nameAttrIdx,varString)},{},graphIn);
end addVarNodeToGraph;
Expand All @@ -1943,11 +1946,14 @@ protected
BackendDAE.Equation eq;
Integer nameAttrIdx;
String eqString, eqNodeId;
list<String> eqChars;
algorithm
nameAttrIdx := listGet(attributeIdcs,1);
{eq} := BackendEquation.getEqns({indx}, eqs);
eqString := BackendDump.equationString(eq);
eqString := HpcOmTaskGraph.prepareXML(eqString);
eqChars := stringListStringChar(eqString);
eqChars := List.map(eqChars,HpcOmTaskGraph.prepareXML);
eqString := stringCharListString(eqChars);
eqNodeId := getEqNodeIdx(indx);
graphOut := GraphML.addNode(eqNodeId,intString(indx),GraphML.COLOR_GREEN,GraphML.RECTANGLE(),SOME(eqString),{(nameAttrIdx,eqString)},{},graphIn);
end addEqNodeToGraph;
Expand Down

0 comments on commit 786fe41

Please sign in to comment.