diff --git a/lib/linesearch.c b/lib/linesearch.c index 27eb8bc..1900b3c 100644 --- a/lib/linesearch.c +++ b/lib/linesearch.c @@ -175,7 +175,7 @@ double linesearch(n,dX,work1,work2,work3,cholinv,q,z,workvec, inc=1; #ifdef HIDDENSTRLEN - dgemv_("T",&n,&j,&scale1,lanczosvectors,&n,z+1,&inc,&scale2,reorth+1,&inc,1,1); + dgemv_("T",&n,&j,&scale1,lanczosvectors,&n,z+1,&inc,&scale2,reorth+1,&inc,1); #else #ifdef NOUNDERBLAS #ifdef CAPSBLAS diff --git a/lib/sdp.c b/lib/sdp.c index f47f206..240b4ee 100644 --- a/lib/sdp.c +++ b/lib/sdp.c @@ -771,6 +771,9 @@ int sdp(n,k,C,a,constant_offset,constraints,byblocks,fill,X,y,Z,cholxinv, t1=(double)tp.tv_sec+(1.0e-6)*tp.tv_usec; #endif +#ifdef HIDDENSTRLEN + dpotrf_("U",&m,O,&ldam,&info,1); +#else #ifdef NOUNDERLAPACK #ifdef CAPSLAPACK DPOTRF("U",&m,O,&ldam,&info); @@ -784,6 +787,7 @@ int sdp(n,k,C,a,constant_offset,constraints,byblocks,fill,X,y,Z,cholxinv, dpotrf_("U",&m,O,&ldam,&info); #endif #endif +#endif #ifdef USEGETTIME gettimeofday(&tp,NULL);