27 #ifdef BUILDER_TRANSFORMATION_TEST
30 #include "pips_config.h"
78 static bool blind_loop_distribution(
const string mod_name)
84 debug_on(
"BLIND_LOOP_DISTRIBUTION_LEVEL");
111 return blind_loop_distribution(mod_name);
instruction copy_instruction(instruction p)
INSTRUCTION.
bool statement_consistent_p(statement p)
sequence make_sequence(list a)
struct _newgen_struct_statement_ * statement
#define gen_recurse(start, domain_number, flt, rwt)
statement instruction_to_statement(instruction)
Build a statement from a give instruction.
bool gen_true(__attribute__((unused)) gen_chunk *unused)
Return true and ignore the argument.
#define NIL
The empty list (nil in Lisp)
size_t gen_length(const list l)
#define CONS(_t_, _i_, _l_)
List element cell constructor (insert an element at the beginning of a list)
list gen_nconc(list cp1, list cp2)
physically concatenates CP1 and CP2 but do not duplicates the elements
#define MAP(_map_CASTER, _map_item, _map_code, _map_list)
Apply/map an instruction block on all the elements of a list (old fashioned)
string db_get_memory_resource(const char *rname, const char *oname, bool pure)
Return the pointer to the resource, whatever it is.
#define DB_PUT_MEMORY_RESOURCE(res_name, own_name, res_val)
conform to old interface.
void flatten_block_if_necessary(instruction i)
Flatten an instruction block if necessary.
#define pips_debug
these macros use the GNU extensions that allow variadic macros, including with an empty list.
#define pips_assert(what, predicate)
common macros, two flavors depending on NDEBUG
bool module_reorder(statement body)
Reorder a module and recompute order to statement if any.
#define instruction_block_p(i)
#define instruction_block(i)
#define instruction_loop_p(x)
#define instruction_loop(x)
#define instruction_domain
newgen_functional_domain_defined
@ is_instruction_sequence
#define instruction_tag(x)
#define instruction_sequence(x)
#define statement_instruction(x)
#define statement_undefined
#define STATEMENT(x)
STATEMENT.
The structure used to build lists in NewGen.