WIP: added interfaces

2024-05-02 11:05:56 +03:00
parent 0f79933131
commit d0d629eeb8
12 changed files with 234 additions and 17 deletions
--- a/dvm/fdvm/trunk/fdvm/acc.cpp
+++ b/dvm/fdvm/trunk/fdvm/acc.cpp
@@ -3912,7 +3912,7 @@ void RefInExpr(SgExpression *e, int mode)
        if (inparloop && isReductionVar(e->symbol()))
            return;
        
-        if ((use = isInUsesList(e->symbol())) != 0)
+        if ((use = isInUsesListByChar(e->symbol()->identifier())) != 0)
        {                              //!printf("RefInExpr  2 (is in list) %d\n",VAR_INTENT(use));
                                       //uses_list ->unparsestdout();  printf("\n");
            *VAR_INTENT(use) = WhatMode(*VAR_INTENT(use), mode);