- bugfix for pre(ASUB(..))

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@13610 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Oct 24, 2012 · 1833658 · 1833658
1 parent 99852c8
commit 1833658
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/Compiler/FrontEnd/ExpressionSimplify.mo b/Compiler/FrontEnd/ExpressionSimplify.mo
@@ -234,11 +234,12 @@ algorithm
       then
         ((e,(b,options)));
 
-    case ((DAE.CALL(path=Absyn.IDENT("pre"), expLst={e as DAE.ASUB(exp = exp)}), (b, options)))
+    case ((e1 as DAE.CALL(path=Absyn.IDENT("pre"), expLst={e as DAE.ASUB(exp = exp)}), (b, options)))
       equation
-        true = Expression.isConst(exp);
+        b2 = Expression.isConst(exp);
+        e1 = Util.if_(b2,e,e1);
       then
-        ((e,(true,options)));
+        ((e1,(b or b2,options)));
 
     // move pre inside
     case ((DAE.CALL(path=Absyn.IDENT("pre"), expLst={e}), (b, options)))