NAME

       isablunaryoper - tests if an operator is unary.

SYNOPSYS

       #include "abl101.h"
       int isablunaryoper( Oper )
         long Oper;

PARAMETERS

       Oper                Operator number.

DESCRIPTION

       isablunaryoper tests if Oper is unary.

RETURN VALUE

       isablunaryoper  returns  1  if  Oper  is  unary,  -1  if Oper is not a valid number, and 0
       otherwise.

EXAMPLE

       #include "abl101.h"
         /* displays    0 1 */
         printf( "%d  ", isablunaryoper( ABL_OR  ) );
         printf( "%d0, isablunaryoper( ABL_NOT ) );

SEE ALSO

       abl(1)