25 #include "pips_config.h"
48 #define NLC_PREFIX "NLC"
49 #define ENTITY_NLC_P(e) (strncmp(entity_local_name(e), NLC_PREFIX, 3) == 0)
95 for(; args !=
NIL; args =
CDR(args))
105 for(; inds !=
NIL; inds =
CDR(inds))
128 debug(4,
"normal_expression_of_statement",
"begin STATEMENT\n");
155 debug(4,
"normal_expression_of_statement",
"Stmt CALL: %s\n",
158 for(; args !=
NIL; args =
CDR(args))
167 debug(4,
"normal_expression_of_statement",
"end STATEMENT\n");
181 debug(3,
"normal_expression_of_unstructured",
"begin UNSTRUCTURED\n");
188 debug(3,
"normal_expression_of_unstructured",
"end UNSTRUCTURED\n");
202 const char*
num = nlc_name+3;
228 Pvecteur Vnot_nlc, Vnlc, Vterm_cst, newV, Vc, Vaux;
246 int num, crt_num = 0;
257 new_vect->succ = Vnlc;
291 new_vect->
succ = Vnot_nlc;
313 Vterm_cst->
succ = newV;
struct _newgen_struct_entity_ * entity
static reference ref
Current stmt (an integer)
#define call_constant_p(C)
#define CONTROL_MAP(ctl, code, c, list)
Macro to walk through all the controls reachable from a given control node of an unstructured.
#define NIL
The empty list (nil in Lisp)
#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 CDR(pcons)
Get the list less its first element.
#define pips_debug
these macros use the GNU extensions that allow variadic macros, including with an empty list.
#define pips_internal_error
void debug(const int the_expected_debug_level, const char *calling_function_name, const char *a_message_format,...)
ARARGS0.
void normal_expression_of_statement(statement s)
===========================================================================
int get_nlc_number(entity nlc_ent)
===========================================================================
void normal_expression_of_expression(expression exp)
===========================================================================
static Pvecteur config_vecteur(Pvecteur Vvar)
===========================================================================
void normal_expression_of_unstructured(unstructured u)
===========================================================================
void reconfig_expression(expression exp)
===========================================================================
string expression_to_string(expression e)
#define NORMALIZE_EXPRESSION(e)
#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...
expression Pvecteur_to_expression(Pvecteur vect)
AP, sep 25th 95 : some usefull functions moved from static_controlize/utils.c.
#define normalized_undefined
#define syntax_reference(x)
#define instruction_loop(x)
#define range_increment(x)
#define EXPRESSION(x)
EXPRESSION.
#define expression_undefined
@ is_instruction_unstructured
#define instruction_tag(x)
#define normalized_tag(x)
#define expression_normalized(x)
#define reference_indices(x)
#define test_condition(x)
#define statement_instruction(x)
#define instruction_call(x)
#define call_arguments(x)
#define control_statement(x)
#define instruction_test(x)
#define normalized_linear(x)
#define expression_syntax(x)
#define instruction_unstructured(x)
#define STATEMENT(x)
STATEMENT.
le type des coefficients dans les vecteurs: Value est defini dans le package arithmetique
The structure used to build lists in NewGen.
#define exp
Avoid some warnings from "gcc -Wshadow".
#define VECTEUR_NUL
DEFINITION DU VECTEUR NUL.
struct Svecteur * Pvecteur
Pvecteur vect_new(Variable var, Value coeff)
Pvecteur vect_new(Variable var,Value coeff): allocation d'un vecteur colineaire au vecteur de base va...