Re: Knowing which BLAS, LAPACK,... subroutine are called

[c.]

On 28 Jan 2013, at 18:03, Jordi Gutiérrez Hermoso <address@hidden> wrote:

> In fact, I would welcome a patch to conditionally enable at
> compile time this debugging output.

Well, here's the patch.
It defines the configure option 

--enable-warn-f77-name  every time a fortran77 function is invoked, issue a
                          warning with the function name. You probably do NOT
                          want to enable this feature.

if this option is given when configuring Octave a warning with id 
"Octave:f77-name"
is issued for every invocation of a F77 function:

>> randn (3) \ ones (3)
warning: invoking Fortran subroutine DGETRF
warning: invoking Fortran subroutine DGECON
warning: invoking Fortran subroutine DGETRS
ans =

  -0.44214  -0.44214  -0.44214
  -2.55030  -2.55030  -2.55030
   0.84029   0.84029   0.84029

>>

The warning can be turned off to disble the debug messages:

>> warning ("off", "Octave:f77-name")
>> randn (3) \ ones (3)
ans =

  -1.87018  -1.87018  -1.87018
   0.75506   0.75506   0.75506
   1.05525   1.05525   1.05525

>> warning ("on", "Octave:f77-name")
>> randn (3) \ ones (3)
warning: invoking Fortran subroutine DGETRF
warning: invoking Fortran subroutine DGECON
warning: invoking Fortran subroutine DGETRS
ans =

  -0.44214  -0.44214  -0.44214
  -2.55030  -2.55030  -2.55030
   0.84029   0.84029   0.84029

>>

and it can be turned on again to get the verbose output again:

>> warning ("on", "Octave:f77-name")
>> randn (3) \ ones (3)
warning: invoking Fortran subroutine DGETRF
warning: invoking Fortran subroutine DGECON
warning: invoking Fortran subroutine DGETRS
ans =

   2.7468   2.7468   2.7468
  -2.5054  -2.5054  -2.5054
   3.2681   3.2681   3.2681

feel free to push the changeset if you like it or ignore it if you don't …
c.

open_JBhHamNZ.txt
Description: Text document