[NF] Constant evaluation fixes.

perost · OpenModelica-Hudson · commit ed95fad9a60e · 2018-05-16T10:59:18.000+02:00
- Implement evaluation of smooth. - Declare pre, change, edge and sample as impure. Belonging to [master]: - #2435
diff --git a/Compiler/NFFrontEnd/NFCeval.mo b/Compiler/NFFrontEnd/NFCeval.mo
@@ -1212,6 +1212,7 @@ algorithm
     case "sinh" then evalBuiltinSinh(listHead(args));
     case "sin" then evalBuiltinSin(listHead(args));
     case "skew" then evalBuiltinSkew(listHead(args));
+    case "smooth" then listGet(args, 2);
     case "sqrt" then evalBuiltinSqrt(listHead(args));
     case "String" then evalBuiltinString(args);
     case "sum" then evalBuiltinSum(listHead(args));
diff --git a/Compiler/NFFrontEnd/NFModelicaBuiltin.mo b/Compiler/NFFrontEnd/NFModelicaBuiltin.mo
@@ -158,7 +158,7 @@ annotation(Documentation(info="<html>
 </html>"));
 end semiLinear;
 
-function edge "Indicate rising edge"
+impure function edge "Indicate rising edge"
   input Boolean b;
   output Boolean edgeEvent;
   // TODO: Ceval parameters? Needed to remove the builtin handler
@@ -485,7 +485,7 @@ function noEvent "Turn off event triggering"
 </html>"));
 end noEvent;
 
-function pre<PodCref> "Refer to left limit"
+impure function pre<PodCref> "Refer to left limit"
   discrete input PodCref y;
   output PodCref p;
   external "builtin";
@@ -494,7 +494,7 @@ function pre<PodCref> "Refer to left limit"
 </html>"));
 end pre;
 
-function change<PodCref> "Indicate discrete variable changing"
+impure function change<PodCref> "Indicate discrete variable changing"
   discrete input PodCref y;
   output Boolean p;
   external "builtin";
@@ -512,7 +512,7 @@ function reinit<RealOrArrayCref, RealOrArrayExpr> "Reinitialize state variable"
 </html>"));
 end reinit;
 
-function sample "Overloaded operator to either trigger time events or to convert between continuous-time and clocked-time representation"
+impure function sample "Overloaded operator to either trigger time events or to convert between continuous-time and clocked-time representation"
   parameter input Real start;
   parameter input Real interval;
   output Boolean b;
