25 #include "pips_config.h"
41 #include "resources.h"
70 bool print_stats_p = ((print_stats_level == 2) ||
71 ((print_stats_level == 1) &&
81 fprintf(stderr,
"statement %s, ordering (%td %td)\n",
106 nblanks = 65-strlen(r);
146 int nblanks = 65-strlen(r);
152 asprintf(&s,
"%s %*s%s (SUMMARY)\n",
185 DBR_GRAPH_PRINTED_FILE
186 :
is_user_view ? DBR_PARSED_PRINTED_FILE : DBR_PRINTED_FILE;
263 #include "pips-libs.h"
264 #ifdef HAVE_PIPS_icfg_LIBRARY
int get_int_property(const string)
sentence make_sentence(enum sentence_utype tag, void *val)
bool print_decorated_call_graph(const string, text(*)(const string))
struct _newgen_struct_statement_ * statement
bool print_source_complexities(const string module_name)
static bool is_user_view
useful
static bool print_code_or_source_comp(const string module_name)
bool print_code_as_a_graph_complexities(const string mod_name)
bool print_call_graph_with_complexities(const string module_name)
static hash_table nts
print_code_complexities or print_source_complexities
static text get_text_complexities(const string module_name)
bool print_code_complexities(const string module_name)
comp_prettyprint.c
static text text_complexity(_UNUSED_ entity module, _UNUSED_ int margin, statement stat)
static text text_summary_complexity(entity module)
void complexity_check_and_warn(char *s, complexity comp) const
char * complexity_sprint(complexity comp, bool print_stats_p, bool print_local_names_p)
#define PRINT_LOCAL_NAMES
bool print_icfg_with_loops_complexities(const string)
bool print_icfg_with_complexities(const string)
complexity load_statement_complexity(statement)
void reset_complexity_map(void)
bool print_icfg_with_control_complexities(const string)
void set_complexity_map(statement_mapping)
#define complexity_undefined
struct _newgen_struct_complexity_ * complexity
const char * module_name(const char *s)
Return the module part of an entity name.
bool get_bool_property(const string)
FC 2015-07-20: yuk, moved out to prevent an include cycle dependency include "properties....
void reset_current_module_entity(void)
Reset the current module entity.
void reset_current_module_statement(void)
Reset the current module statement.
statement set_current_module_statement(statement)
Set the current module statement.
statement get_current_module_statement(void)
Get the current module statement.
entity set_current_module_entity(entity)
static.c
entity get_current_module_entity(void)
Get the entity of the current module.
#define NIL
The empty list (nil in Lisp)
string db_get_memory_resource(const char *rname, const char *oname, bool pure)
Return the pointer to the resource, whatever it is.
bool statement_call_p(statement)
statement apply_number_to_statement(hash_table, _int)
hash_table allocate_number_to_statement(void)
hash_table build_number_to_statement(hash_table, statement)
void hash_table_free(hash_table htp)
this function deletes a hash table that is no longer useful.
bool generic_print_icfg(const string, bool, bool, bool, text(*)(const string))
static statement mod_stat
We want to keep track of the current statement inside the recurse.
#define pips_internal_error
string concatenate(const char *,...)
Return the concatenation of the given strings.
#define HASH_UNDEFINED_VALUE
value returned by hash_get() when the key is not found; could also be called HASH_KEY_NOT_FOUND,...
#define hash_table_undefined
Value of an undefined hash_table.
string get_comment_sentinel()
Start a single line comment.
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_and_free(const char *, const char *, const char *, text)
void set_bool_property(const char *, bool)
#define ORDERING_NUMBER(o)
#define ORDERING_STATEMENT(o)
entity module_name_to_entity(const char *mn)
This is an alias for local_name_to_top_level_entity.
const char * module_local_name(entity e)
Returns the module local user name.
bool fortran_module_p(entity m)
Test if a module is in Fortran.
#define statement_ordering(x)
#define statement_label(x)
@ is_instruction_unstructured
@ is_instruction_whileloop
@ is_instruction_expression
@ is_instruction_multitest
@ is_instruction_sequence
#define instruction_tag(x)
#define statement_instruction(x)
#define statement_undefined_p(x)
#define statement_number(x)
#define statement_undefined
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 MERGE_TEXTS(r, t)
#define ADD_SENTENCE_TO_TEXT(t, p)
string words_to_string(cons *lw)