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@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to