Seems like this in 83986 [1] needs a fix in Lapack.c:
if (dladdr((void *) F77_NAME(ilaver), &dl_info)) {
char buf[PATH_MAX+1];
char *res = realpath(dl_info.dli_fname, buf);
if (res) {
SEXP nfo = R_NilValue;
if (strstr(res, "flexiblas"))
nfo = R_flexiblas_info();
if (isNull(nfo))
nfo = mkChar("");
ans = ScalarString(nfo);
break;
}
}
It will always return an empty string except for flexiblas. I assume
this is not intentional.
Gabor
[1] https://github.com/wch/r-source/commit/77b1f5a75f8691d3e77ef07ece53f0bb6c149020#diff-b6e85dec8d7194fae29b1a1768e3f6608fa184e57f0828f48c05ebd29ef653c8R1416
La_library() always returns "" on R-devel?
2 messages · Gábor Csárdi, Tomas Kalibera
On 3/17/23 11:53, G?bor Cs?rdi wrote:
Seems like this in 83986 [1] needs a fix in Lapack.c:
if (dladdr((void *) F77_NAME(ilaver), &dl_info)) {
char buf[PATH_MAX+1];
char *res = realpath(dl_info.dli_fname, buf);
if (res) {
SEXP nfo = R_NilValue;
if (strstr(res, "flexiblas"))
nfo = R_flexiblas_info();
if (isNull(nfo))
nfo = mkChar("");
ans = ScalarString(nfo);
break;
}
}
It will always return an empty string except for flexiblas. I assume
this is not intentional.
Thanks, fixed now. Tomas
______________________________________________ R-devel at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel