4 * Basic helper routine descriptions for 'sparse'.
6 * Copyright (C) 2003 Transmeta Corp.
8 * Licensed under the Open Software License version 1.1
11 extern unsigned int hexval(unsigned int c
);
27 struct statement_list
;
29 struct expression_list
;
31 struct token
*skip_to(struct token
*, int);
32 struct token
*expect(struct token
*, int, const char *);
33 extern void warn(struct position
, const char *, ...);
34 extern void error(struct position
, const char *, ...);
36 #define __DECLARE_ALLOCATOR(type, x) \
37 extern type *__alloc_##x(int); \
38 extern void show_##x##_alloc(void); \
39 extern void clear_##x##_alloc(void);
40 #define DECLARE_ALLOCATOR(x) __DECLARE_ALLOCATOR(struct x, x)
42 DECLARE_ALLOCATOR(ident
);
43 DECLARE_ALLOCATOR(token
);
44 DECLARE_ALLOCATOR(symbol
);
45 DECLARE_ALLOCATOR(expression
);
46 DECLARE_ALLOCATOR(statement
);
47 DECLARE_ALLOCATOR(string
);
48 DECLARE_ALLOCATOR(scope
);
49 __DECLARE_ALLOCATOR(void, bytes
);
51 #define LIST_NODE_NR (29)
55 struct ptr_list
*prev
;
56 struct ptr_list
*next
;
57 void *list
[LIST_NODE_NR
];
60 #define ITERATE_FIRST 1
61 #define ITERATE_LAST 2
62 void iterate(struct ptr_list
*,void (*callback
)(void *, void *, int), void*);
63 extern void add_ptr_list(struct ptr_list
**, void *);
64 extern int ptr_list_size(struct ptr_list
*);
66 #define symbol_list_size(list) ptr_list_size((struct ptr_list *)(list))
67 #define statement_list_size(list) ptr_list_size((struct ptr_list *)(list))
68 #define expression_list_size(list) ptr_list_size((struct ptr_list *)(list))
70 static inline void add_symbol(struct symbol_list
**list
, struct symbol
*sym
)
72 add_ptr_list((struct ptr_list
**)list
, sym
);
75 static inline void add_statement(struct statement_list
**list
, struct statement
*stmt
)
77 add_ptr_list((struct ptr_list
**)list
, stmt
);
80 static inline void add_expression(struct expression_list
**list
, struct expression
*expr
)
82 add_ptr_list((struct ptr_list
**)list
, expr
);
85 static inline void symbol_iterate(struct symbol_list
*list
, void (*callback
)(struct symbol
*, void *, int), void *data
)
87 iterate((struct ptr_list
*)list
, (void (*)(void *, void *, int))callback
, data
);
90 static inline void statement_iterate(struct statement_list
*list
, void (*callback
)(struct statement
*, void *, int), void *data
)
92 iterate((struct ptr_list
*)list
, (void (*)(void *, void *, int))callback
, data
);
95 static inline void expression_iterate(struct expression_list
*list
, void (*callback
)(struct expression
*, void *, int), void *data
)
97 iterate((struct ptr_list
*)list
, (void (*)(void *, void *, int))callback
, data
);
100 #define PREPARE_PTR_LIST(head, ptr) \
102 struct ptr_list *__head##ptr = (struct ptr_list *) (head); \
103 struct ptr_list *__list##ptr = __head##ptr; \
105 if (__head##ptr) ptr = (__typeof__(ptr)) __head##ptr->list[0]; \
108 #define NEXT_PTR_LIST(ptr) \
110 if (++__nr##ptr < __list##ptr->nr) { \
111 ptr = (__typeof__(ptr)) __list##ptr->list[__nr##ptr]; \
113 __list##ptr = __list##ptr->next; \
115 if (__list##ptr != __head##ptr) { \
117 ptr = (__typeof__(ptr)) __list##ptr->list[0]; \
122 #define RESET_PTR_LIST(ptr) do { \
124 if (__head##ptr) ptr = (__typeof__(ptr)) __head##ptr->list[0]; \
128 #define FINISH_PTR_LIST(ptr) \
129 (void)(__nr##ptr); /* Sanity-check nesting */ \
132 #define FOR_EACH_PTR(head, ptr) do { \
133 struct ptr_list *__head = (struct ptr_list *) (head); \
134 struct ptr_list *__list = __head; \
135 int __flag = ITERATE_FIRST; \
138 for (__i = 0; __i < __list->nr; __i++) { \
139 if (__i == __list->nr-1 && __list->next == __head) \
140 __flag |= ITERATE_LAST; \
142 ptr = (__typeof__(ptr)) (__list->list[__i]); \
145 #define END_FOR_EACH_PTR } while (0); \
149 } while ((__list = __list->next) != __head); \
153 #define FOR_EACH_PTR_REVERSE(head, ptr) do { \
154 struct ptr_list *__head = (struct ptr_list *) (head); \
155 struct ptr_list *__list = __head; \
156 int __flag = ITERATE_FIRST; \
159 __list = __list->prev; \
161 while (--__i >= 0) { \
162 if (__i == 0 && __list == __head) \
163 __flag |= ITERATE_LAST; \
165 ptr = (__typeof__(ptr)) (__list->list[__i]); \
168 #define END_FOR_EACH_PTR_REVERSE } while (0); \
172 } while (__list != __head); \
176 #define THIS_ADDRESS(x) \
177 ((__typeof__(&(x))) (__list->list + __i))