Retl()

PURPOSE

Return an integer as a Recital logical

SYNONYM

api_ret_l()

SYNOPSIS

#include "dbapi.h"
 
int	_retl(flag)
 
<input parameters>
int	*flag;		/* Value for logical	*/
 
<output parameters>
none

DESCRIPTION

The _retl() function returns an integer as a logical back to Recital. If flag is 0 then .F. is returned, if flag is 1 then .T. is returned.

EXAMPLE

The following returns .T. if the first parameter passed is a logical.

Example Recital program:

m_value=.T.
m_result=islogical(m_value)

Example 'C' function:

#include "dbapi.h"
 
dbapi_islogical()
{
    int	result;
 
    if (_parinfo  == API_LTYPE) {
       result = 1;
    } else {
       result = 0;
    }
 
    _retl( result );
}

SEE ALSO

_parni(), _parl(), _retni(), ISLOG(), PCOUNT