24 #ifdef BUILDER_OMPIFY_CODE
40 #include "pips_config.h"
68 static void generate_expr_omp_pragma_loop (
loop l) {
102 tmp = strchr(str,
'O');
106 tmp = strchr(str,
'o');
118 pips_debug (5,
"new for pragma as an extension added: %s \n", str);
129 static void generate_str_omp_pragma_loop (
loop l) {
139 pragma_str_for (l,
stmt);
150 "OMPIFY_CODE_DEBUG_LEVEL");
172 if (strcmp (
type,
"str") == 0)
174 generate_str_omp_pragma_loop);
175 else if (strcmp (
type,
"expr") == 0)
177 generate_expr_omp_pragma_loop);
bool ompify_code(const char *)
generate_pragma.c
bool statement_has_omp_parallel_directive_p(statement)
manage_pragma.c
static statement module_statement
struct _newgen_struct_statement_ * statement
const char * module_name(const char *s)
Return the module part of an entity name.
char * get_string_property(const char *)
#define gen_recurse(start, domain_number, flt, rwt)
gen_chunk * gen_get_ancestor(int, const void *)
return the first ancestor object found of the given type.
bool gen_true(__attribute__((unused)) gen_chunk *unused)
Return true and ignore the argument.
#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.
void set_prettyprint_language_from_property(enum language_utype native)
set the prettyprint language according to the property PRETTYPRINT_LANGUAGE @description If the prope...
enum language_utype get_prettyprint_language_tag()
#define pips_debug
these macros use the GNU extensions that allow variadic macros, including with an empty list.
#define pips_assert(what, predicate)
common macros, two flavors depending on NDEBUG
#define pips_internal_error
string chop_newline(string, bool)
text text_omp_directive(loop l, int m)
void set_string_property(const char *, const char *)
bool omp_pragma_expr_for(loop l, statement stmt)
generate "pragma omp for" as a list of expressions
entity module_name_to_entity(const char *mn)
This is an alias for local_name_to_top_level_entity.
void add_pragma_str_to_statement(statement st, const char *s, bool copy_flag)
Add a string as a pragma to a statement.
#define loop_domain
newgen_language_domain_defined
#define statement_domain
newgen_sizeofexpression_domain_defined
#define entity_initial(x)
string text_to_string(text t)
SG: moved here from ricedg.