|
OpenADFortTk (basic)
|
#include <AdjustFunctions.h>
Public Member Functions | |
| AdjustFunctions (PU_Info *aPUInfoForest_p) | |
| void | doIt () |
Private Member Functions | |
| void | forPUInfoTree (PU_Info *aPUInfoTree_p) |
| void | forPUInfo (PU_Info *aPUInfo_p) |
| void | forSubTree (WN_TREE_CONTAINER< PRE_ORDER > &aWNPtree) |
| bool | doSymbol (ST *theST_p) |
Private Attributes | |
| PU_Info * | myPUInfoForest_p |
for functions any references to global symbol table entries need to be adjusted for active types
Definition at line 13 of file AdjustFunctions.h.
| xaif2whirl::AdjustFunctions::AdjustFunctions | ( | PU_Info * | aPUInfoForest_p | ) | [inline] |
Definition at line 17 of file AdjustFunctions.h.
| void xaif2whirl::AdjustFunctions::doIt | ( | ) |
top level routine that does it for the forest of PU trees
Definition at line 12 of file AdjustFunctions.cxx.
References forPUInfoTree(), and myPUInfoForest_p.
Referenced by xaif2whirl::real_main().

| bool xaif2whirl::AdjustFunctions::doSymbol | ( | ST * | theST_p | ) | [private] |
does the symbol meet the criteria
Definition at line 31 of file AdjustFunctions.cxx.
References xaif2whirl::ActiveTypeInitializedTyIdx, and xaif2whirl::ActiveTypeTyIdx.
Referenced by forSubTree().
| void xaif2whirl::AdjustFunctions::forPUInfo | ( | PU_Info * | aPUInfo_p | ) | [private] |
for each PU within a tree of PUs
Definition at line 90 of file AdjustFunctions.cxx.
References forSubTree(), PU_SetGlobalState(), and SexpTags::ST.
Referenced by forPUInfoTree().

| void xaif2whirl::AdjustFunctions::forPUInfoTree | ( | PU_Info * | aPUInfoTree_p | ) | [private] |
recursively for each (sub) tree of PUs
Definition at line 21 of file AdjustFunctions.cxx.
References forPUInfo().
Referenced by doIt().

| void xaif2whirl::AdjustFunctions::forSubTree | ( | WN_TREE_CONTAINER< PRE_ORDER > & | aWNPtree | ) | [private] |
Definition at line 39 of file AdjustFunctions.cxx.
References xaif2whirl::XlateExpression::createValueSelector(), doSymbol(), and WN_Tree_Type().
Referenced by forPUInfo().

PU_Info* xaif2whirl::AdjustFunctions::myPUInfoForest_p [private] |