PIPS
|
#include "linear.h"
#include "genC.h"
#include "misc.h"
#include "ri.h"
#include "ri-util.h"
#include "text-util.h"
#include "prettyprint.h"
Go to the source code of this file.
Functions | |
string | close_pragma (pragma p __attribute__((unused))) |
string | pragma_to_string (pragma p) |
void | add_expr_to_pragma_expr_list (pragma pr, expression ex) |
Add an expression to the pragma current expression list. More... | |
void add_expr_to_pragma_expr_list | ( | pragma | pr, |
expression | ex | ||
) |
Add an expression to the pragma current expression list.
pr,the | pragma to process. |
ex,the | expression to add. |
Add the new pragma to the extension list:
pr | r |
ex | x |
Definition at line 147 of file pragma.c.
References free(), gen_expression_cons(), pips_assert, pips_debug, pragma_expression, pragma_expression_p, and pragma_to_string().
Referenced by add_loop_parallel_threshold().
p,the | pragma to be closed |
STEP -> les pragma ne sont pas toujours fermés par des "omp end parallel do"
result = strdup(concatenate(FORTRAN_PRAGMA_HEADER, "omp end parallel do", NULL));
Definition at line 53 of file pragma.c.
References prettyprint_language_is_fortran_p(), and string_undefined.
Referenced by close_extension().
Definition at line 69 of file pragma.c.
References C_PRAGMA_HEADER_STRING, concatenate(), EXPRESSION, FOREACH, FORTRAN_OMP_CONTINUATION_STRING, FORTRAN_PRAGMA_HEADER_STRING, gen_free_list(), gen_insert_before(), gen_nreverse(), get_prettyprint_language_tag(), is_language_c, is_language_fortran, is_language_fortran95, is_pragma_expression, is_pragma_string, MAX_LINE_LENGTH, NIL, pips_assert, pips_internal_error, pragma_expression, pragma_string, pragma_tag, prettyprint_language_is_fortran_p(), strdup(), STRING, string_buffer_append(), string_buffer_append_list(), string_buffer_free_all(), string_buffer_make(), string_buffer_to_string(), string_undefined, and words_expression().
Referenced by add_expr_to_pragma_expr_list(), build_omp_pragma_list(), build_outer(), extension_to_string(), inner_rewrite(), and pragma_scmp_task_p().