Subversion Repositories tendra.SVN

Rev

Rev 5 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5 Rev 6
Line 35... Line 35...
35 
#ifndef MEMBER_OPS_H_INCLUDED
 35 
#ifndef MEMBER_OPS_H_INCLUDED
36 
#define MEMBER_OPS_H_INCLUDED
 36 
#define MEMBER_OPS_H_INCLUDED
37 
 
 37 
 
38 
/* Operations for union MEMBER */
 38 
/* Operations for union MEMBER */
39 
 
 39 
 
40 
#pragma token PROC ( EXP : MEMBER : ) EXP : unsigned : TAG_member #
 40 
#pragma token PROC(EXP : MEMBER :) EXP : unsigned : TAG_member #
41 
#pragma interface TAG_member
 41 
#pragma interface TAG_member
42 
 
 42 
 
43 
 
 43 
 
44 
/* Operations for component id of union MEMBER */
 44 
/* Operations for component id of union MEMBER */
45 
 
 45 
 
46 
#pragma token PROC ( EXP : MEMBER : )\
 46 
#pragma token PROC(EXP : MEMBER :)\
47 
    EXP : PTR ( IDENTIFIER ) : member_id #
 47 
    EXP : PTR(IDENTIFIER) : member_id #
48 
#pragma interface member_id
 48 
#pragma interface member_id
49 
 
 49 
 
50 
/* Operations for component alt of union MEMBER */
 50 
/* Operations for component alt of union MEMBER */
51 
 
 51 
 
52 
#pragma token PROC ( EXP : MEMBER : )\
 52 
#pragma token PROC(EXP : MEMBER :)\
53 
    EXP : PTR ( IDENTIFIER ) : member_alt #
 53 
    EXP : PTR(IDENTIFIER) : member_alt #
54 
#pragma interface member_alt
 54 
#pragma interface member_alt
55 
 
 55 
 
56 
/* Operations for component next of union MEMBER */
 56 
/* Operations for component next of union MEMBER */
57 
 
 57 
 
58 
#pragma token PROC ( EXP : MEMBER : )\
 58 
#pragma token PROC(EXP : MEMBER :)\
59 
    EXP : PTR ( MEMBER ) : member_next #
 59 
    EXP : PTR(MEMBER) : member_next #
60 
#pragma interface member_next
 60 
#pragma interface member_next
61 
 
 61 
 
62 
/* Operations for field small of union MEMBER */
 62 
/* Operations for field small of union MEMBER */
63 
 
 63 
 
64 
#pragma token EXP const : unsigned : member_small_tag #
 64 
#pragma token EXP const : unsigned : member_small_tag #
65 
#pragma token PROC ( EXP : MEMBER : ) EXP : int : IS_member_small #
 65 
#pragma token PROC(EXP : MEMBER :) EXP : int : IS_member_small #
66 
#pragma interface member_small_tag IS_member_small
 66 
#pragma interface member_small_tag IS_member_small
67 
 
 67 
 
68 
#pragma token PROC (\
 68 
#pragma token PROC(\
69 
	EXP : MEMBER :,\
 69 
	EXP : MEMBER :,\
70 
	EXP lvalue : MEMBER :\
 70 
	EXP lvalue : MEMBER :\
71 
    ) STATEMENT MAKE_member_small #
 71 
    ) STATEMENT MAKE_member_small #
72 
#pragma interface MAKE_member_small
 72 
#pragma interface MAKE_member_small
73 
 
 73 
 
74 
#pragma token PROC (\
 74 
#pragma token PROC(\
75 
	EXP lvalue : IDENTIFIER :,\
 75 
	EXP lvalue : IDENTIFIER :,\
76 
	EXP lvalue : IDENTIFIER :,\
 76 
	EXP lvalue : IDENTIFIER :,\
77 
	EXP lvalue : MEMBER :,\
 77 
	EXP lvalue : MEMBER :,\
78 
	EXP : MEMBER :\
 78 
	EXP : MEMBER :\
79 
    ) STATEMENT DECONS_member_small #
 79 
    ) STATEMENT DECONS_member_small #
80 
#pragma interface DECONS_member_small
 80 
#pragma interface DECONS_member_small
81 
 
 81 
 
82 
#pragma token PROC (\
 82 
#pragma token PROC(\
83 
	EXP : DESTROYER :,\
 83 
	EXP : DESTROYER :,\
84 
	EXP lvalue : IDENTIFIER :,\
 84 
	EXP lvalue : IDENTIFIER :,\
85 
	EXP lvalue : IDENTIFIER :,\
 85 
	EXP lvalue : IDENTIFIER :,\
86 
	EXP lvalue : MEMBER :,\
 86 
	EXP lvalue : MEMBER :,\
87 
	EXP : MEMBER :\
 87 
	EXP : MEMBER :\
Line 90... Line 90...
90 
 
 90 
 
91 
 
 91 
 
92 
/* Operations for field large of union MEMBER */
 92 
/* Operations for field large of union MEMBER */
93 
 
 93 
 
94 
#pragma token EXP const : unsigned : member_large_tag #
 94 
#pragma token EXP const : unsigned : member_large_tag #
95 
#pragma token PROC ( EXP : MEMBER : ) EXP : int : IS_member_large #
 95 
#pragma token PROC(EXP : MEMBER :) EXP : int : IS_member_large #
96 
#pragma interface member_large_tag IS_member_large
 96 
#pragma interface member_large_tag IS_member_large
97 
 
 97 
 
98 
#pragma token PROC ( EXP : MEMBER : )\
 98 
#pragma token PROC(EXP : MEMBER :)\
99 
    EXP : PTR ( MEMBER ) : member_large_tnext #
 99 
    EXP : PTR(MEMBER) : member_large_tnext #
100 
#pragma interface member_large_tnext
 100 
#pragma interface member_large_tnext
101 
 
 101 
 
102 
#pragma token PROC (\
 102 
#pragma token PROC(\
103 
	EXP : MEMBER :,\
 103 
	EXP : MEMBER :,\
104 
	EXP : MEMBER :,\
 104 
	EXP : MEMBER :,\
105 
	EXP lvalue : MEMBER :\
 105 
	EXP lvalue : MEMBER :\
106 
    ) STATEMENT MAKE_member_large #
 106 
    ) STATEMENT MAKE_member_large #
107 
#pragma interface MAKE_member_large
 107 
#pragma interface MAKE_member_large
108 
 
 108 
 
109 
#pragma token PROC (\
 109 
#pragma token PROC(\
110 
	EXP lvalue : IDENTIFIER :,\
 110 
	EXP lvalue : IDENTIFIER :,\
111 
	EXP lvalue : IDENTIFIER :,\
 111 
	EXP lvalue : IDENTIFIER :,\
112 
	EXP lvalue : MEMBER :,\
 112 
	EXP lvalue : MEMBER :,\
113 
	EXP lvalue : MEMBER :,\
 113 
	EXP lvalue : MEMBER :,\
114 
	EXP : MEMBER :\
 114 
	EXP : MEMBER :\
115 
    ) STATEMENT DECONS_member_large #
 115 
    ) STATEMENT DECONS_member_large #
116 
#pragma interface DECONS_member_large
 116 
#pragma interface DECONS_member_large
117 
 
 117 
 
118 
#pragma token PROC (\
 118 
#pragma token PROC(\
119 
	EXP : DESTROYER :,\
 119 
	EXP : DESTROYER :,\
120 
	EXP lvalue : IDENTIFIER :,\
 120 
	EXP lvalue : IDENTIFIER :,\
121 
	EXP lvalue : IDENTIFIER :,\
 121 
	EXP lvalue : IDENTIFIER :,\
122 
	EXP lvalue : MEMBER :,\
 122 
	EXP lvalue : MEMBER :,\
123 
	EXP lvalue : MEMBER :,\
 123 
	EXP lvalue : MEMBER :,\