SYNOPSYS

#include "abl101.h"
int isablsimilarexpr( Expr1, Expr2 )
  chain_list *Expr1;
  chain_list *Expr2;

PARAMETERS

Expr1

First expression.

Expr2

Second expression.

DESCRIPTION

isablequalexpr compares Expr1 and Expr2.

RETURN VALUE

if Expr1 and Expr2 have got the same morphology isablequalexpr returns 1 and 0 otherwise.

EXAMPLE

#include "abl101.h"
   chain_list *Expr1;
   chain_list *Expr2;
   Expr1 = createablbinexpr( ABL_AND,
                             createablatom( "a" ),
                             createablatom( "b" ) );
   Expr2 = createablbinexpr( ABL_AND,
                             createablatom( "c" ),
                             createablatom( "d" ) );
   /* displays 1 */
   printf( "%d", isablsimilarexpr( Expr1, Expr2 ) );