Index: flang/lib/Evaluate/tools.cpp =================================================================== --- flang/lib/Evaluate/tools.cpp +++ flang/lib/Evaluate/tools.cpp @@ -1004,12 +1004,8 @@ return true; } else if (IsDummy(symbol) || IsFunctionResult(symbol)) { return false; - } else { - for (; !scope->IsGlobal(); scope = &scope->parent()) { - if (scope->hasSAVE()) { - return true; - } - } + } else if (scope->hasSAVE() ) { + return true; } } return false;