8 * Basic helper routine descriptions for 'sparse'.
10 * Copyright (C) 2003 Transmeta Corp.
14 * Licensed under the Open Software License version 1.1
20 #define DO_STRINGIFY(x) #x
21 #define STRINGIFY(x) DO_STRINGIFY(x)
24 #define ARRAY_SIZE(x) (sizeof(x)/sizeof((x)[0]))
27 extern int verbose
, optimize
, optimize_size
, preprocessing
;
28 extern int die_if_error
;
29 extern int repeat_phase
, merge_phi_sources
;
30 extern int gcc_major
, gcc_minor
, gcc_patchlevel
;
32 extern unsigned int hexval(unsigned int c
);
55 DECLARE_PTR_LIST(symbol_list
, struct symbol
);
56 DECLARE_PTR_LIST(statement_list
, struct statement
);
57 DECLARE_PTR_LIST(expression_list
, struct expression
);
58 DECLARE_PTR_LIST(basic_block_list
, struct basic_block
);
59 DECLARE_PTR_LIST(instruction_list
, struct instruction
);
60 DECLARE_PTR_LIST(multijmp_list
, struct multijmp
);
61 DECLARE_PTR_LIST(pseudo_list
, struct pseudo
);
62 DECLARE_PTR_LIST(string_list
, char);
64 typedef struct pseudo
*pseudo_t
;
66 struct token
*skip_to(struct token
*, int);
67 struct token
*expect(struct token
*, int, const char *);
69 #define FORMAT_ATTR(pos) __attribute__ ((__format__ (__printf__, pos, pos+1)))
70 #define NORETURN_ATTR __attribute__ ((__noreturn__))
71 #define SENTINEL_ATTR __attribute__ ((__sentinel__))
73 #define FORMAT_ATTR(pos)
77 extern void die(const char *, ...) FORMAT_ATTR(1) NORETURN_ATTR
;
78 extern void info(struct position
, const char *, ...) FORMAT_ATTR(2);
79 extern void warning(struct position
, const char *, ...) FORMAT_ATTR(2);
80 extern void sparse_error(struct position
, const char *, ...) FORMAT_ATTR(2);
81 extern void error_die(struct position
, const char *, ...) FORMAT_ATTR(2) NORETURN_ATTR
;
82 extern void expression_error(struct expression
*, const char *, ...) FORMAT_ATTR(2);
84 extern void add_pre_buffer(const char *fmt
, ...) FORMAT_ATTR(1);
86 extern int preprocess_only
;
88 extern int Waddress_space
;
90 extern int Wcast_to_as
;
91 extern int Wcast_truncate
;
94 extern int Wdefault_bitfield_sign
;
95 extern int Wdesignated_init
;
97 extern int Wenum_mismatch
;
98 extern int Wnon_pointer_null
;
99 extern int Wold_initializer
;
100 extern int Wone_bit_signed_bitfield
;
101 extern int Wparen_string
;
102 extern int Wptr_subtraction_blows
;
103 extern int Wreturn_void
;
105 extern int Wtransparent_union
;
106 extern int Wtypesign
;
108 extern int Wuninitialized
;
109 extern int Wdeclarationafterstatement
;
111 extern int dbg_entry
;
114 extern void declare_builtin_functions(void);
115 extern void create_builtin_stream(void);
116 extern struct symbol_list
*sparse_initialize(int argc
, char **argv
, struct string_list
**files
);
117 extern struct symbol_list
*__sparse(char *filename
);
118 extern struct symbol_list
*sparse_keep_tokens(char *filename
);
119 extern struct symbol_list
*sparse(char *filename
);
121 static inline int symbol_list_size(struct symbol_list
*list
)
123 return ptr_list_size((struct ptr_list
*)(list
));
126 static inline int statement_list_size(struct statement_list
*list
)
128 return ptr_list_size((struct ptr_list
*)(list
));
131 static inline int expression_list_size(struct expression_list
*list
)
133 return ptr_list_size((struct ptr_list
*)(list
));
136 static inline int instruction_list_size(struct instruction_list
*list
)
138 return ptr_list_size((struct ptr_list
*)(list
));
141 static inline int pseudo_list_size(struct pseudo_list
*list
)
143 return ptr_list_size((struct ptr_list
*)(list
));
146 static inline int bb_list_size(struct basic_block_list
*list
)
148 return ptr_list_size((struct ptr_list
*)(list
));
151 static inline void free_instruction_list(struct instruction_list
**head
)
153 free_ptr_list((struct ptr_list
**)head
);
156 static inline struct instruction
* delete_last_instruction(struct instruction_list
**head
)
158 return undo_ptr_list_last((struct ptr_list
**)head
);
161 static inline struct basic_block
* delete_last_basic_block(struct basic_block_list
**head
)
163 return delete_ptr_list_last((struct ptr_list
**)head
);
166 static inline struct basic_block
*first_basic_block(struct basic_block_list
*head
)
168 return first_ptr_list((struct ptr_list
*)head
);
170 static inline struct instruction
*last_instruction(struct instruction_list
*head
)
172 return last_ptr_list((struct ptr_list
*)head
);
175 static inline struct instruction
*first_instruction(struct instruction_list
*head
)
177 return first_ptr_list((struct ptr_list
*)head
);
180 static inline pseudo_t
first_pseudo(struct pseudo_list
*head
)
182 return first_ptr_list((struct ptr_list
*)head
);
185 static inline void concat_symbol_list(struct symbol_list
*from
, struct symbol_list
**to
)
187 concat_ptr_list((struct ptr_list
*)from
, (struct ptr_list
**)to
);
190 static inline void concat_basic_block_list(struct basic_block_list
*from
, struct basic_block_list
**to
)
192 concat_ptr_list((struct ptr_list
*)from
, (struct ptr_list
**)to
);
195 static inline void concat_instruction_list(struct instruction_list
*from
, struct instruction_list
**to
)
197 concat_ptr_list((struct ptr_list
*)from
, (struct ptr_list
**)to
);
200 static inline void add_symbol(struct symbol_list
**list
, struct symbol
*sym
)
202 add_ptr_list(list
, sym
);
205 static inline void add_statement(struct statement_list
**list
, struct statement
*stmt
)
207 add_ptr_list(list
, stmt
);
210 static inline void add_expression(struct expression_list
**list
, struct expression
*expr
)
212 add_ptr_list(list
, expr
);
215 #define hashval(x) ((unsigned long)(x))