26 #include "pips_config.h"
116 pips_assert(
"Allocatable shouldn't have any indices !",
122 pips_assert(
"Allocatable field shouldn't have any indices !",
#define ENDP(l)
Test if a list is empty.
#define CAR(pcons)
Get the value of the first element of a list.
#define CDR(pcons)
Get the list less its first element.
#define same_stringn_p(a, b, c)
#define pips_assert(what, predicate)
common macros, two flavors depending on NDEBUG
#define ALLOCATABLE_UBOUND_PREFIX
#define FIELD_OPERATOR_NAME
#define ENTITY_FIELD_P(e)
C data structure and pointer management.
#define ALLOCATABLE_PREFIX
#define ALLOCATABLE_LBOUND_PREFIX
expression get_allocatable_data_expr(entity e)
This function produce an expression that is an access to the array inside the allocatable structure.
bool entity_allocatable_p(entity e)
Check if an entity is an allocatable.
bool expression_allocatable_data_access_p(expression e)
Check if an expression is a reference to an allocatable array.
entity get_allocatable_data_entity(entity e)
Get the entity inside the struct corresponding to the array, mostly for correct prettyprint.
const char * entity_user_name(entity e)
Since entity_local_name may contain PIPS special characters such as prefixes (label,...
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...
entity CreateIntrinsic(string name)
this function does not create an intrinsic function because they must all be created beforehand by th...
bool expression_call_p(expression e)
expression entity_to_expression(entity e)
if v is a constant, returns a constant call.
expression MakeBinaryCall(entity f, expression eg, expression ed)
Creates a call expression to a function with 2 arguments.
call expression_call(expression e)
reference expression_reference(expression e)
Short cut, meaningful only if expression_reference_p(e) holds.
#define reference_variable(x)
#define basic_derived_p(x)
#define reference_indices(x)
#define call_arguments(x)
#define type_variable_p(x)
#define variable_basic(x)
The structure used to build lists in NewGen.