isabloperinexpr3

Synopsys

#include "abl101.h"
int isabloperinexpr( Expr, Oper )
  chain_list ∗Expr;
  long        Oper;

Parameters

Overview

isabloperinexpr tests if Oper appears in Expr.

Return value

isabloperinexpr returns 1 if Oper appears in Expr and 0 otherwise.

Examples

#include "abl101.h"
  chain_list ∗Expr;
   Expr = createablbinexpr( ABL_AND, 
                            createablatom( "a" ),
                            createablatom( "b" ) );
   /* displays   1 */
   printf( "%d", isabloperinexpr( Expr, ABL_AND ) );