Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

ID 766686
Date 11/07/2023
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

xerbla_array

Assists other languages in calling the xerbla function.

Syntax

call xerbla_array( srname_array, srname_len, info )

Include Files

  • mkl.fi

Description

The routine assists other languages in calling the error handling xerbla function. Rather than taking a Fortran string argument as the function name, xerbla_array takes an array of single characters along with the array length. The routine then copies up to 32 characters of that array into a Fortran string and passes that to xerbla. If called with a non-positive srname_len, the routine will call xerbla with a string of all blank characters.

If some macro or other device makes xerbla_array available to C99 by a name lapack_xerbla and with a common Fortran calling convention, a C99 program could invoke xerbla via:

{
   int flen = strlen(__func__);
   lapack_xerbla(__func__, &flen, &info);
}

Providing xerbla_array is not necessary for intercepting LAPACK errors. xerbla_array calls xerbla.

Output Parameters

srname_array

CHARACTER(1).

Array, dimension (srname_len). The name of the routine that called xerbla_array.

srname_len

INTEGER.

The length of the name in srname_array.

info

INTEGER.

Position of the invalid parameter in the parameter list of the calling routine.