- small optimizations

- use memcpy instead of for loop
- do not copy the hashtable if not needed

Author: adrpo

Compiler/FrontEnd/InstExtends.mo

@@ -1112,7 +1112,7 @@ algorithm
 
     case (cache,env,SCode.PARTS(elts,ne,ie,na,ia,nc,clats,ed),htParent)
       equation
-        ht = BaseHashTable.copy(htParent);
+        ht = if listEmpty(elts) then htParent else BaseHashTable.copy(htParent);
         ht = getLocalIdentList(elts,ht,getLocalIdentElement);
         (cache,elts) = fixList(cache,env,elts,ht,fixElement);
         (cache,ne) = fixList(cache,env,ne,ht,fixEquation);
@@ -1124,7 +1124,7 @@ algorithm
 
     case (cache,env,SCode.CLASS_EXTENDS(name,mod,SCode.PARTS(elts,ne,ie,na,ia,nc,clats,ed)),htParent)
       equation
-        ht = BaseHashTable.copy(htParent);
+        ht = if listEmpty(elts) then htParent else BaseHashTable.copy(htParent);
         (cache,mod) = fixModifications(cache,env,mod,ht);
         (cache,elts) = fixList(cache,env,elts,ht,fixElement);
         (cache,ne) = fixList(cache,env,ne,ht,fixEquation);

SimulationRuntime/c/meta/meta_modelica_builtin.c

@@ -605,10 +605,7 @@ modelica_metatype arrayCopy(modelica_metatype arr)
   void* res = (struct mmc_struct*)mmc_mk_box_no_assign(nelts, MMC_ARRAY_TAG);
   void **arrp = MMC_STRUCTDATA(arr);
   void **resp = MMC_STRUCTDATA(res);
-  int i = 0;
-  for(i=0; i<nelts; i++) {
-    resp[i] = arrp[i];
-  }
+  memcpy(resp, arrp, sizeof(modelica_metatype)*nelts);
   return res;
 }