Skip to content

Commit

Permalink
- bugfix for last commit
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@13700 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
Jens Frenkel committed Oct 29, 2012
1 parent 9db75f9 commit d38fdc4
Showing 1 changed file with 7 additions and 4 deletions.
11 changes: 7 additions & 4 deletions Compiler/BackEnd/BackendDAECreate.mo
Expand Up @@ -233,6 +233,7 @@ algorithm
DAE.ElementSource source;
list<DAE.Exp> explst;
DAE.Exp e2;
Boolean b;

// class for external object
case (DAE.EXTOBJECTCLASS(path,source),_,_,_,_,_,_,_,_,_,_,_,_)
Expand Down Expand Up @@ -275,11 +276,13 @@ algorithm
// equalityConstraint equations, moved to removed equations
case (DAE.ARRAY_EQUATION(exp = DAE.ARRAY(ty=_),array=DAE.CALL(path=path)),_,_,_,_,_,_,_,_,_,_,_,_)
equation
true = stringEq(Absyn.pathLastIdent(path),"equalityConstraint");
eqns = lowerEqn(inElement,functionTree,inREqnsLst);
b = stringEq(Absyn.pathLastIdent(path),"equalityConstraint");
eqns = Util.if_(b,inREqnsLst,inEqnsLst);
eqns = lowerEqn(inElement,functionTree,eqns);
((eqns,reqns)) = Util.if_(b,(inEqnsLst,eqns),(eqns,inREqnsLst));
then
(inVars,inKnVars,inExVars,inEqnsLst,eqns,inIEqnsLst,inConstraintLst,inClassAttributeLst,inWhenClauseLst,inExtObjClasses,iAliaseqns);
(inVars,inKnVars,inExVars,eqns,reqns,inIEqnsLst,inConstraintLst,inClassAttributeLst,inWhenClauseLst,inExtObjClasses,iAliaseqns);

// scalar equations
case (DAE.EQUATION(exp = _),_,_,_,_,_,_,_,_,_,_,_,_)
equation
Expand Down

0 comments on commit d38fdc4

Please sign in to comment.