28 #ifdef BUILDER_PRINT_PARALLELIZEDCRAY_CODE
31 #include "pips_config.h"
83 debug(7,
"real_loop_locals",
"real loop local: %s\n",
120 all_enclosed_scope_variables(lpb));
127 l1= all_enclosed_scope_variables(
test_true(tst));
128 l2= all_enclosed_scope_variables(
test_false(tst));
170 list ent_l= all_enclosed_scope_variables(lp_stt);
200 "[text_microtasked_loop] loop locals of %s: ",
209 fprintf(stderr,
"\nent_l content is: ");
306 txt = text_vectorized_loop(
module, margin, stat);
310 txt = text_microtasked_loop(
module, margin, stat);
343 debug_on(
"PRETTYPRINT_DEBUG_LEVEL");
348 DBR_PARALLELPRINTED_FILE,
349 PARALLEL_FORTRAN_EXT,
float a2sf[2] __attribute__((aligned(16)))
USER generates a user error (i.e., non fatal) by printing the given MSG according to the FMT.
unformatted make_unformatted(string a1, intptr_t a2, intptr_t a3, list a4)
sentence make_sentence(enum sentence_utype tag, void *val)
struct _newgen_struct_statement_ * statement
void init_rw_effects(void)
void reset_proper_rw_effects(void)
void init_proper_rw_effects(void)
statement_effects get_rw_effects(void)
void reset_rw_effects(void)
void rproper_effects_of_statement(statement)
void rcumulated_effects_of_statement(statement)
#define effect_any_reference(e)
FI: cannot be used as a left hand side.
#define effects_undefined
#define effects_effects(x)
effects stmt_to_fx(statement, statement_effects)
returns proper effects associated to statement stmt
char * get_string_property(const char *)
#define CONTROL_MAP(ctl, code, c, list)
Macro to walk through all the controls reachable from a given control node of an unstructured.
void reset_current_module_entity(void)
Reset the current module entity.
entity set_current_module_entity(entity)
static.c
bool instruction_assign_p(instruction i)
Test if an instruction is an assignment.
#define NIL
The empty list (nil in Lisp)
#define CONS(_t_, _i_, _l_)
List element cell constructor (insert an element at the beginning of a list)
#define CAR(pcons)
Get the value of the first element of a list.
void gen_free_list(list l)
free the spine of the list
#define MAPL(_map_list_cp, _code, _l)
Apply some code on the addresses of all the elements of a list.
string db_get_memory_resource(const char *rname, const char *oname, bool pure)
Return the pointer to the resource, whatever it is.
static statement mod_stat
We want to keep track of the current statement inside the recurse.
#define pips_assert(what, predicate)
common macros, two flavors depending on NDEBUG
#define pips_internal_error
void debug(const int the_expected_debug_level, const char *calling_function_name, const char *a_message_format,...)
ARARGS0.
const char * entity_minimal_name(entity e)
Do preserve scope informations.
void close_prettyprint()
because some prettyprint functions may be used for debug, so the last hook set by somebody may have s...
void init_prettyprint(text(*hook)(entity, int, statement))
checks that the prettyprint hook was actually reset...
text text_module(entity, statement)
bool make_text_resource(const char *, const char *, const char *, text)
print.c
#define PRETTYPRINT_PARALLEL
void set_string_property(const char *, const char *)
#define unstructured_control
After the modification in Newgen: unstructured = entry:control x exit:control we have create a macro ...
#define is_instruction_block
soft block->sequence transition
#define instruction_block(i)
const char * entity_local_name(entity e)
entity_local_name modified so that it does not core when used in vect_fprint, since someone thought t...
bool entity_in_list_p(entity ent, list ent_l)
look for ent in ent_l
bool same_entity_p(entity e1, entity e2)
predicates on entities
entity module_name_to_entity(const char *mn)
This is an alias for local_name_to_top_level_entity.
list concat_new_entities(list l1, list l2)
returns l1 after elements of l2 but not of l1 have been appended to l1.
#define loop_execution(x)
#define instruction_loop_p(x)
#define reference_variable(x)
#define instruction_loop(x)
@ is_instruction_unstructured
@ is_instruction_whileloop
#define instruction_tag(x)
#define instruction_whileloop(x)
#define whileloop_body(x)
#define statement_instruction(x)
@ is_execution_sequential
#define control_statement(x)
#define instruction_test(x)
#define instruction_unstructured(x)
#define statement_undefined
#define STATEMENT(x)
STATEMENT.
int fprintf()
test sc_min : ce test s'appelle par : programme fichier1.data fichier2.data ...
The structure used to build lists in NewGen.
#define CHAIN_SWORD(l, s)
#define ADD_SENTENCE_TO_TEXT(t, p)
@ is_sentence_unformatted