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
>
> Gabor
>
> [1]
https://github.com/wch/r-source/commit/77b1f5a75f8691d3e77ef07ece53f0bb6c149020#diff-b6e85dec8d7194fae29b1a1768e3f6608fa184e57f0828f48c05ebd29ef653c8R1416
>
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel