diff --git a/flang/lib/evaluate/fold.cc b/flang/lib/evaluate/fold.cc
index cd8421202c0d..f93274a9dc3b 100644
--- a/flang/lib/evaluate/fold.cc
+++ b/flang/lib/evaluate/fold.cc
@@ -802,9 +802,6 @@ FOR_EACH_TYPE_AND_KIND(template class ExpressionBase)
 
 class IsConstantExprVisitor : public virtual TraversalBase<bool> {
 public:
-  using Base = TraversalBase<bool>;
-  using Base::Handle, Base::Pre, Base::Post;
-
   explicit IsConstantExprVisitor(std::nullptr_t) {}
 
   template<int KIND> void Handle(const TypeParamInquiry<KIND> &inq) {
diff --git a/flang/lib/evaluate/traversal.h b/flang/lib/evaluate/traversal.h
index 49a28725242a..0c708d29e817 100644
--- a/flang/lib/evaluate/traversal.h
+++ b/flang/lib/evaluate/traversal.h
@@ -155,9 +155,11 @@ template<typename V> void Descend(V &visitor, const ProcedureRef &call) {
 }
 
 template<typename RESULT, typename... A>
-class Traversal : public virtual TraversalBase<RESULT>, public virtual A... {
+class Traversal : public virtual TraversalBase<RESULT>, public A... {
 public:
   using Result = RESULT;
+  using Base = TraversalBase<Result>;
+  using Base::Handle, Base::Pre, Base::Post;
   using A::Handle..., A::Pre..., A::Post...;
 private:
   using TraversalBase<Result>::result_, TraversalBase<Result>::defaultHandle_;