mapabloperexpr.3alc - Man Page

#include "abl101.h"
chain_list ∗mapabloperexpr( Function, Oper, Expr )
  chain_list ∗ (∗Function)();
  long       Oper;
  chain_list ∗Expr;

Function

Function name to apply to all operands.

Oper

Operator number.

Expr

Expression to scan.

mapabloperexpr applies Function to all operands of Expr. mapabloperexpr creates a head of an operator expression having Oper as operator and adds the arguments calculated by applying Function to each arguments of Expr. Function must return an expression and must have a  unique expression as argument.

mapabloperexpr returns a new expression by applying Function to all the arguments of the operator expression Expr.

#include "abl101.h"
   chain_list ∗MapFunction( MapExpr )
      chain_list ∗MapExpr;
   {
     return( createablnotexpr( dupablexpr( MapExpr ) ) );
   }
   chain_list ∗Expr;
   chain_list ∗Expr1;
   Expr = createablbinexpr( ABL_NOR,
                            createablatom( "a" ),
                            createablatom( "b" ) );
   Expr1 = mapabloperexpr( MapFunction, ABL_AND, Expr );
   /* displays ((not a) and (not b))  */
   viewablexpr( Expr1, ABL_VIEW_VHDL );

abl(1)