Changeset 13354

Timestamp:

2012-10-12T18:42:34+02:00 (12 years ago)

Author:

jfrenkel

Message:

• use consOnTrue instead of Util.if_(res, e :: inAccum, inAccum)), save memory
• fix bootstrapping

Location:

trunk/Compiler

Files:

• BackEnd/BackendDAE.mo (modified) (1 diff)
• Util/List.mo (modified) (4 diffs)

trunk/Compiler/BackEnd/BackendDAE.mo

@@ -203 +203 @@
     Connections.* i.e. Connections.root(...) functions."
     Absyn.Path functionName;
-    list<DAE.Exp> functionArgs;
-    DAE.ElementSource source "the origin of the component/equation/algorithm";
+    list<.DAE.Exp> functionArgs;
+    .DAE.ElementSource source "the origin of the component/equation/algorithm";
   end NORETCALL;
   

trunk/Compiler/Util/List.mo

@@ -6930 +6930 @@
         res = inFunc(e);
       then
-        select_tail(rest, inFunc, Util.if_(res, e :: inAccum, inAccum));
+        select_tail(rest, inFunc, consOnTrue(res, e , inAccum));
   end match;
 end select_tail;
@@ -7034 +7034 @@
         res = inFunc(e, inArg1);
       then
-        select1_tail(rest, inFunc, inArg1, Util.if_(res, e :: inAccum, inAccum));
+        select1_tail(rest, inFunc, inArg1, consOnTrue(res, e ,inAccum));
   end match;
 end select1_tail;
@@ -7080 +7080 @@
         res = inFunc(inArg1, e);
       then
-        select1r_tail(rest, inFunc, inArg1, Util.if_(res, e :: inAccum, inAccum));
+        select1r_tail(rest, inFunc, inArg1, consOnTrue(res, e, inAccum));
   end match;
 end select1r_tail;
@@ -7133 +7133 @@
       then
         select2_tail(rest, inFunc, inArg1, inArg2, 
-          Util.if_(res, e :: inAccum, inAccum));
+          consOnTrue(res, e, inAccum));
   end match;
 end select2_tail;