Skip to content

Commit e4fbdab

Browse files
author
Michael Kloeppel
committed
fixes for METIS scheduler and UMFPACK solver
git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@23822 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
1 parent f65b079 commit e4fbdab

File tree

3 files changed

+6
-6
lines changed

3 files changed

+6
-6
lines changed

Compiler/runtime/config.unix.h.in

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -52,7 +52,7 @@
5252
#define CONFIG_SYSTEMLIBS mmc_mk_cons(mmc_mk_scon("-lomcruntime"),mmc_mk_cons(mmc_mk_scon("-lexpat"),mmc_mk_cons(mmc_mk_scon("-lsqlite3"),mmc_mk_cons(mmc_mk_scon(CONFIG_LPSOLVE55),mmc_mk_cons(mmc_mk_scon(CONFIG_CORBALIBS),mmc_mk_nil())))))
5353

5454
#define USE_GRAPH @USE_GRAPH@
55-
#if usegraph
55+
#if USE_GRAPH
5656
#define USE_PATOH @USE_PATOH@
5757
#define USE_METIS @USE_METIS@
5858
#endif

SimulationRuntime/cpp/Solver/UmfPack/UmfPack.cpp

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -38,13 +38,14 @@ void UmfPack::solve()
3838
long int dimRHS = 1; // Dimension of right hand side of linear system (=b)
3939
long int dimSys = _algLoop->getDimReal();
4040
long int irtrn = 0; // Retrun-flag of Fortran code _algLoop->getReal(_y);
41-
double * _helpArray = new double[_algLoop->getDimReal()];
41+
long int * _helpArray = new long int[_algLoop->getDimReal()];
4242
_algLoop->evaluate();
4343
_algLoop->getRHS(_rhs);
4444
_algLoop->getSystemMatrix(_jacd);
4545
dgesv_(&dimSys,&dimRHS,_jacd,&dimSys,_helpArray,_rhs,&dimSys,&irtrn);
4646
memcpy(_x,_rhs,dimSys*sizeof(double));
4747
_algLoop->setReal(_x);
48+
delete [] _helpArray;
4849
} else {
4950
_algLoop->evaluate();
5051
_algLoop->getRHS(_rhs);

configure.in

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -28,8 +28,7 @@ AC_SUBST(IDLPYTHONCMD)
2828
AC_SUBST(USE_GRAPH)
2929
AC_SUBST(USE_METIS)
3030
AC_SUBST(USE_PATOH)
31-
AC_SUBST(METISHOME)
32-
AC_SUBST(PATOHHOME)
31+
AC_SUBST(GRAPHLIB)
3332
AC_SUBST(GENERATED_AUTOCONF_FILES)
3433
AC_SUBST(RT_LDFLAGS)
3534
AC_SUBST(RT_LDFLAGS_SIM)
@@ -818,7 +817,7 @@ AC_ARG_WITH(METIS, [ --with-METIS=DIR Compile with Metis graph
818817
USE_METIS=1
819818
USE_GRAPH=1
820819
AC_MSG_RESULT([Enabling METIS... METISHOME="$withval"]);
821-
METISHOME="$withval";
820+
GRAPHLIB="-L$withval -lmetis";
822821
USE_PATOH=0
823822
], [
824823
USE_GRAPH=0
@@ -838,7 +837,7 @@ AC_ARG_WITH(PATOH, [ --with-PATOH=DIR Compile with PATOH hyperg
838837
USE_METIS=0
839838
USE_GRAPH=1
840839
AC_MSG_RESULT([Enabling PATOH... PATOHHOME="$withval"]);
841-
PATOHHOME="$withval";
840+
GRAPHLIB="-L$withval -lpatoh";
842841
], [
843842
if test "$USE_METIS" = 0; then
844843
USE_GRAPH=0

0 commit comments

Comments
 (0)