1GETABLEXPRSUPPORT(3) ABL FUNCTIONS GETABLEXPRSUPPORT(3)
2
3
4
6 getablexprsupport - gives the expression's support.
7
9 #include "abl101.h"
10 void ∗getablexprsupport( Expr, Mode )
11 chain_list ∗Expr;
12 int Mode;
13
15 Expr Expression.
16
17 Mode The returned support's mode.
18
20 getablexprsupport gives the support of Expr. if Mode is ABL_SUP‐
21 PORT_CHAIN the support is returned using chain_list else it is returned
22 using ptype_list. The support must be freed using the freechain or
23 freeptype functions.
24
26 getablexprsupport returns a pointer to a chain_list or a ptype_list.
27
29 #include "abl101.h"
30 chain_list ∗Expr;
31 ptype_list ∗Support;
32 ptype_list ∗ScanSupport;
33 Expr = createablbinexpr( ABL_AND,
34 createablatom( "a" ),
35 createablatom( "b" ) );
36 Support = getablexprsupport( Expr, ABL_SUPPORT_PTYPE );
37 /* displays a b */
38 for ( ScanSupport = Support;
39 ScanSupport != (ptype_list ∗)0;
40 ScanSupport = ScanSupport->NEXT )
41 {
42 printf( "%s ", (char *)ScanSupport->DATA );
43 }
44 freeptype( Support );
45
47 abl(1)
48
49
50
51
52
53
54ASIM/LIP6 October 1, 1997 GETABLEXPRSUPPORT(3)