Skip to content

Commit

Permalink
Fix bootstrapping
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@15206 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
sjoelund committed Feb 17, 2013
1 parent 17de475 commit e59c8b8
Showing 1 changed file with 4 additions and 6 deletions.
10 changes: 4 additions & 6 deletions Compiler/Template/Tpl.mo
Original file line number Diff line number Diff line change
Expand Up @@ -1541,14 +1541,13 @@ protected function tplCallWithFailError
output Text out_txt;
end Tpl_Fun;
protected
Tpl_Fun in_fun;
ArgType1 arg;
Text txt;
algorithm
outTxt := matchcontinue(inFun, inArg)
case(in_fun, arg)
case(_, arg)
equation
txt = in_fun(emptyTxt, arg);
txt = inFun(emptyTxt, arg);
then txt;
else
equation
Expand Down Expand Up @@ -1602,16 +1601,15 @@ protected function tplCallWithFailError3
output Text out_txt;
end Tpl_Fun;
protected
Tpl_Fun in_fun;
ArgType1 argA;
ArgType2 argB;
ArgType3 argC;
Text txt;
algorithm
outTxt := matchcontinue(inFun, inArgA, inArgB, inArgC)
case(in_fun, argA, argB, argC)
case(_, argA, argB, argC)
equation
txt = in_fun(emptyTxt, argA, argB, argC);
txt = inFun(emptyTxt, argA, argB, argC);
then txt;
else
equation
Expand Down

0 comments on commit e59c8b8

Please sign in to comment.