scalopragma.c File Reference

#include "genC.h"
#include "linear.h"
#include "ri.h"
#include "ri-util.h"
#include "prettyprint.h"
#include "misc.h"
#include "effects-generic.h"
#include "effects-simple.h"
#include "control.h"
#include "callgraph.h"
#include "pipsdbm.h"
#include "resources.h"
#include "accel-util.h"
#include "properties.h"

Include dependency graph for scalopragma.c:

Go to the source code of this file.

Functions
static bool	pragma_scmp_task_p (pragma p)
static bool	find_pragma (const statement s)
bool	scalopragma (char *module_name)

Variables
list	statement_to_outline
	A simple phase that outline task with pragma for SCMP. More...

Function Documentation

find_pragma()

static bool find_pragma ( const statement  s )

static

print_statement(s);

Definition at line 37 of file scalopragma.c.

                                          {
  /* print_statement(s); */
  pips_debug(1,"______\n");
  if(extensions_defined_p(statement_extensions(s))){
    list l = extensions_extension(statement_extensions(s));
    FOREACH(EXTENSION, ext, l){
      pragma pra = extension_pragma(ext);
      if(pragma_scmp_task_p(pra)){
        pips_debug(1,"SCMP_task\n");
        statement stmt = (statement) gen_get_ancestor(statement_domain,s);
        if(statement_loop_p(s))
          statement_to_outline = CONS(STATEMENT, s , statement_to_outline);
        
        else if(!statement_undefined_p(stmt) && statement_block_p(stmt))
          statement_to_outline = CONS(STATEMENT, stmt , statement_to_outline);
        return true;
      }
    }
  }
  return true;
}

References CONS, EXTENSION, extension_pragma, extensions_defined_p(), extensions_extension, FOREACH, gen_get_ancestor(), pips_debug, pragma_scmp_task_p(), STATEMENT, statement_block_p, statement_domain, statement_extensions, statement_loop_p(), statement_to_outline, and statement_undefined_p.

Referenced by scalopragma().

Here is the call graph for this function:

Here is the caller graph for this function:

pragma_scmp_task_p()

static bool pragma_scmp_task_p ( pragma  p )

static

Definition at line 28 of file scalopragma.c.

                                        {
  string s =  pragma_to_string(p);
  if(strstr(s,"scmp task")!=NULL)
    return true;
  else
    return false;
}

References pragma_to_string().

Referenced by find_pragma().

Here is the call graph for this function:

Here is the caller graph for this function:

scalopragma()

bool scalopragma

(

char *

module_name

)

ook for statement with SCMP pragma

elete statement pragma

Parameters

module_name

odule_name

Definition at line 59 of file scalopragma.c.

                                     {
  
  // Use this module name and this environment variable to set
  statement module_statement = PIPS_PHASE_PRELUDE(module_name,
                                                  "SCALOPRAGMA_DEBUG_LEVEL");
  
  set_cumulated_rw_effects((statement_effects)db_get_memory_resource(DBR_CUMULATED_EFFECTS, module_name, true));
  
  statement_to_outline=NIL;
  
  /*look for statement with SCMP pragma*/
  gen_recurse(module_statement, statement_domain, find_pragma, gen_null);
 
  statement_to_outline = gen_nreverse(statement_to_outline);
 
  
  FOREACH(STATEMENT, stmt, statement_to_outline){
 
    /*delete statement pragma*/
    extensions_extension(statement_extensions(stmt))=NIL;
 
    outliner(build_new_top_level_module_name(get_string_property("GPU_LAUNCHER_PREFIX"), false ), CONS(STATEMENT,stmt,NIL));
  }
 
 
 
 
 
  gen_free_list(statement_to_outline);
  
  // We may have outline some code, so recompute the callees:
  DB_PUT_MEMORY_RESOURCE(DBR_CALLEES, module_name,
                         compute_callees(get_current_module_statement()));
  
  reset_cumulated_rw_effects();
  // Put back the new statement module
  PIPS_PHASE_POSTLUDE(module_statement);
  
  return true;
}

References build_new_top_level_module_name(), compute_callees(), CONS, db_get_memory_resource(), DB_PUT_MEMORY_RESOURCE, extensions_extension, find_pragma(), FOREACH, gen_free_list(), gen_nreverse(), gen_null(), gen_recurse, get_current_module_statement(), get_string_property(), module_name(), module_statement, NIL, outliner(), PIPS_PHASE_POSTLUDE, PIPS_PHASE_PRELUDE, reset_cumulated_rw_effects(), set_cumulated_rw_effects(), STATEMENT, statement_domain, statement_extensions, and statement_to_outline.

Here is the call graph for this function:

Variable Documentation

statement_to_outline

list statement_to_outline

A simple phase that outline task with pragma for SCMP.

scalopragma.c

cleme.nosp@m.nt.m.nosp@m.argue.nosp@m.t@hp.nosp@m.c-pro.nosp@m.ject.nosp@m..com

Definition at line 25 of file scalopragma.c.

Referenced by find_pragma(), outline(), and scalopragma().