SYNOPSYS

#include "abl101.h"
void mapablexpr( Function, Expr )
  void      (*Function)();
  chain_list *Expr;

PARAMETERS

Function

Function name to apply to all operands.

Expr

Expression to scan.

DESCRIPTION

mapablexpr applies Function to all operands of Expr.

RETURN VALUE

mapablexpr returns nothing.

EXAMPLE

#include "abl101.h"
   void MapFunction( MapExpr )
     chain_list *MapExpr;
   {
     if ( ABL_ATOM( MapExpr ) )
     {
       printf( stdout, "%s", ABL_ATOM_VALUE( MapExpr ) );
     }
     else
     {
       mapablexpr( MapFunction, MapExpr );
     }
   }
   ...
   chain_list *Expr;
   ...
   mapablexpr( MapFunction, Expr );
   ...