10 #include "pips_config.h"
21 #include "resources.h"
46 "PREPEND_COMMENT_DEBUG_LEVEL");
97 "PREPEND_CALL_DEBUG_LEVEL");
functional make_functional(list a1, type a2)
call make_call(entity a1, list a2)
value make_value_code(code _field_)
storage make_storage_rom(void)
type make_type_functional(functional _field_)
type make_type_void(list _field_)
statement copy_statement(statement p)
STATEMENT.
entity check_entity(entity p)
instruction make_instruction_call(call _field_)
code make_code(list a1, string a2, sequence a3, list a4, language a5)
language make_language_c(void)
sequence make_sequence(list a)
static statement module_statement
callees compute_callees(const statement stat)
Recompute the callees of a module statement.
const char * module_name(const char *s)
Return the module part of an entity name.
char * get_string_property(const char *)
bool get_bool_property(const string)
FC 2015-07-20: yuk, moved out to prevent an include cycle dependency include "properties....
static void comment(string_buffer code, spoc_hardware_type hw, dagvtx v, int stage, int side, bool flip)
#define gen_context_recurse(start, ctxt, domain_number, flt, rwt)
static void do_add_pragma(statement s, statement p)
bool prepend_call(string mn)
This function adds a call to ficticious global function "MY_TRACK" as first executabble statement of ...
bool add_pragma(const string mn)
bool prepend_comment(char *module_name)
Add a comment at the begin of a module code.
statement instruction_to_statement(instruction)
Build a statement from a give instruction.
bool gen_true2(__attribute__((unused)) gen_chunk *u1, __attribute__((unused)) void *u2)
#define NIL
The empty list (nil in Lisp)
#define PIPS_PHASE_POSTLUDE(new_module_statement)
End a transformation phase by putting back into PIPS the (possibly) modified statement.
#define PIPS_PHASE_PRELUDE(module_name, debug_env_var)
Start a phase that use a module CODE.
#define DB_PUT_MEMORY_RESOURCE(res_name, own_name, res_val)
conform to old interface.
void insert_comments_to_statement(statement, const char *)
Insert a comment string (if non empty) at the beginning of the comments of a statement.
bool return_statement_p(statement)
Test if a statement is a C or Fortran "return".
void insert_statement(statement, statement, bool)
This is the normal entry point.
#define pips_assert(what, predicate)
common macros, two flavors depending on NDEBUG
#define TOP_LEVEL_MODULE_NAME
Module containing the global variables in Fortran and C.
#define MODULE_SEP_STRING
string concatenate(const char *,...)
Return the concatenation of the given strings.
int f(int off1, int off2, int n, float r[n], float a[n], float b[n])
#define make_entity(n, t, s, i)
#define make_empty_statement
An alias for make_empty_block_statement.
void add_pragma_str_to_statement(statement st, const char *s, bool copy_flag)
Add a string as a pragma to a statement.
#define statement_domain
newgen_sizeofexpression_domain_defined