Retnl()

PURPOSE

Return a long as a numeric

SYNONYM

api_ret_nl()

SYNOPSIS

#include "lianja_api.h"
 
int	_retnl(n)
 
<input parameters>
int	n;		/*Numeric value		*/
 
<output parameters>
none

DESCRIPTION

The function returns a long as a numeric value.

EXAMPLE

The following example returns a value stored as a long to a numeric memory variable.

Example Lianja script:

m_value=dtol(1234)
return.

Example 'C' function:

#include "lianja_api.h"
 
lianjaapi_dtol()
{
    long	value;
 
    if ( _parinfo(1)  == API_NTYPE ) {
       value =  _parnl(1);
    } else {
       value = 0; 
    }
 
    _retnl( value );
}

SEE ALSO

_parinfa(), _parinfo(), parnd(), _parni(), _parl(), _retnd(), retni(), ISNUM()