1MAPABLEXPR(3) ABL FUNCTIONS MAPABLEXPR(3)
2
3
4
6 mapablexpr - applies a function to all operands.
7
9 #include "abl101.h"
10 void mapablexpr( Function, Expr )
11 void (∗Function)();
12 chain_list ∗Expr;
13
15 Function Function name to apply to all operands.
16
17 Expr Expression to scan.
18
20 mapablexpr applies Function to all operands of Expr.
21
23 mapablexpr returns nothing.
24
26 #include "abl101.h"
27 void MapFunction( MapExpr )
28 chain_list ∗MapExpr;
29 {
30 if ( ABL_ATOM( MapExpr ) )
31 {
32 printf( stdout, "%s", ABL_ATOM_VALUE( MapExpr ) );
33 }
34 else
35 {
36 mapablexpr( MapFunction, MapExpr );
37 }
38 }
39 ...
40 chain_list ∗Expr;
41 ...
42 mapablexpr( MapFunction, Expr );
43 ...
44
46 abl(1)
47
48
49
50
51
52
53ASIM/LIP6 October 1, 1997 MAPABLEXPR(3)