Skip to content

Commit

Permalink
Recommit change from r23112 with appropriate fixes
Browse files Browse the repository at this point in the history
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@23118 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
  • Loading branch information
Henning Kiel committed Oct 31, 2014
1 parent cb60493 commit 8e56d0c
Show file tree
Hide file tree
Showing 2 changed files with 10 additions and 10 deletions.
10 changes: 5 additions & 5 deletions SimulationRuntime/c/util/integer_array.c
Expand Up @@ -1107,12 +1107,12 @@ void exp_integer_array(const integer_array_t * a, modelica_integer n, integer_ar
clone_integer_array_spec(a,dest);
copy_integer_array_data(*a,dest);
} else {
integer_array_t* tmp = 0;
clone_integer_array_spec(a,tmp);
copy_integer_array_data(*a,tmp);
integer_array_t tmp;
clone_integer_array_spec(a,&tmp);
copy_integer_array_data(*a,&tmp);
for( i = 1; i < n; ++i) {
mul_integer_matrix_product(a,tmp,dest);
copy_integer_array_data(*dest,tmp);
mul_integer_matrix_product(a,&tmp,dest);
copy_integer_array_data(*dest,&tmp);
}
}
}
Expand Down
10 changes: 5 additions & 5 deletions SimulationRuntime/c/util/real_array.c
Expand Up @@ -1189,12 +1189,12 @@ void exp_real_array(const real_array_t * a, modelica_integer n, real_array_t* de
clone_real_array_spec(a,dest);
copy_real_array_data(*a,dest);
} else {
real_array_t* tmp = 0;
clone_real_array_spec(a,tmp);
copy_real_array_data(*a,tmp);
real_array_t tmp;
clone_real_array_spec(a,&tmp);
copy_real_array_data(*a,&tmp);
for(i = 1; i < n; ++i) {
mul_real_matrix_product(a,tmp,dest);
copy_real_array_data(*dest,tmp);
mul_real_matrix_product(a,&tmp,dest);
copy_real_array_data(*dest,&tmp);
}
}
}
Expand Down

0 comments on commit 8e56d0c

Please sign in to comment.