fixed and improved SAPFOR and FDVM
This commit is contained in:
@@ -415,6 +415,8 @@ const int Logical_8 = 12;
|
||||
#define HEDR(A) ((A)->thesymb->entry.Template.func_hedr)
|
||||
#define FILE_LAST_STATEMENT(ST) ((SgStatement **)(ST)->attributeValue(0,LAST_STATEMENT))
|
||||
#define CALLED_FUNCTIONS(ST) ((symb_list **)(ST)->attributeValue(0,RTC_CALLS))
|
||||
#define INTERFACE_RTS2 (parloop_by_handler == 2)
|
||||
#define CANCEL_RTS2_MODE if(parloop_by_handler == 2) parloop_by_handler = -1
|
||||
#define RESUMPTION_RTS2_MODE if(parloop_by_handler == -1) parloop_by_handler = 2
|
||||
#define HEADER_FOR_HANDLER(A) ( (SgSymbol **)(A)->attributeValue(0,HANDLER_HEADER) )
|
||||
#define USE_STATEMENTS_ARE_REQUIRED ( (int *) first_do_par->attributeValue(0,MODULE_USE) )
|
||||
|
||||
Reference in New Issue
Block a user