SYNOPSYS

#include "abl101.h"
long getablexprdepth( Expr )
  chain_list *Expr;

PARAMETERS

Expr

Expression.

DESCRIPTION

getablexprdepth gives the depth of an expression.

RETURN VALUE

getablexprdepth returns the depth of Expr.

EXAMPLE

#include "abl101.h"
   chain_list *ExprA;
   chain_list *ExprB;
   chain_list *ExprAorB;
   ExprA = createablatom( "a" );
   ExprB = createablatom( "b" );
   ExprAorB  = createablbinexpr( ABL_OR, ExprA, ExprB );
   /* displays 1 */
   printf( "%d", getablexprdepth( ExprAorB ) );