27 extern void NF_STRERROR(
char *AS,
unsigned D0,
const int *A1)
30 A0= (
char*)nc_strerror( (
int)*A1 );
31 memcpy(AS,A0, (D0<(A0==((
void *)0)?0:strlen(A0))?D0:(A0==((
void *)0)?0:strlen(A0))) );
32 D0>(A0==((
void *)0)?0:strlen(A0))?memset(AS+(A0==((
void *)0)?0:strlen(A0)),
' ', D0-(A0==((
void *)0)?0:strlen(A0))):0;
42 nc_issyserr(
int errcode)
FCALLSCFUN1(STRING,(char *) nc_strerror, NF_STRERROR, nf_strerror, FINT2CINT) static int nc_issyserr(int errcode)
logical function nf_issyserr(nerr)
#define FCALLSCFUN0(T0, CN, UN, LN)
character(len=80) function nf_strerror(ncerr)
character(len=80) function nf_inq_libvers()