[flang] Fix bug

Original-commit: flang-compiler/f18@482f882e3f8c5d6dae699949eb848001dc65bbc7
Reviewed-on: https://github.com/flang-compiler/f18/pull/603

diff --git a/flang/lib/evaluate/tools.h b/flang/lib/evaluate/tools.h
index 595589a..02e9b23 100644 (file)
--- a/flang/lib/evaluate/tools.h
+++ b/flang/lib/evaluate/tools.h
@@ -65,7 +65,7 @@ struct IsVariableVisitor : public virtual VisitorBase<std::optional<bool>> {
   using Result = std::optional<bool>;
   explicit IsVariableVisitor(std::nullptr_t) {}
   void Handle(const StaticDataObject &) { Return(false); }
-  void Handle(const DataRef &) { Return(true); }
+  void Handle(const Symbol &) { Return(true); }
   void Pre(const Component &) { Return(true); }
   void Pre(const ArrayRef &) { Return(true); }
   void Pre(const CoarrayRef &) { Return(true); }