Expansion of the TStreamerInfo actions.

core/meta/src/TStreamerElement.cxx

@@ -480,8 +480,10 @@ void TStreamerElement::ls(Option_t *) const
 void TStreamerElement::SetArrayDim(Int_t dim)
 {
    fArrayDim = dim;
-   if (dim) fType += TVirtualStreamerInfo::kOffsetL;
-   fNewType = fType;
+   if (dim) {
+      fType += TVirtualStreamerInfo::kOffsetL;
+      fNewType += TVirtualStreamerInfo::kOffsetL;
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////
@@ -1715,7 +1717,10 @@ TStreamerSTL::TStreamerSTL(const char *name, const char *title, Int_t offset,
       fCtype = proxy.GetType();
       if (proxy.HasPointers()) fCtype += TVirtualStreamerInfo::kOffsetP;
    }
-   if (TStreamerSTL::IsaPointer()) fType = TVirtualStreamerInfo::kSTLp;
+   if (TStreamerSTL::IsaPointer()) {
+      fType = TVirtualStreamerInfo::kSTLp;
+      fNewType = fType;
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////
@@ -1794,7 +1799,10 @@ TStreamerSTL::TStreamerSTL(const char *name, const char *title, Int_t offset,
       }
    }
 
-   if (TStreamerSTL::IsaPointer()) fType = TVirtualStreamerInfo::kSTLp;
+   if (TStreamerSTL::IsaPointer()) {
+      fType = TVirtualStreamerInfo::kSTLp;
+      fNewType = fType;
+   }
 }
 
 ////////////////////////////////////////////////////////////////////////////////

io/io/src/TStreamerInfo.cxx

@@ -535,8 +535,10 @@ void TStreamerInfo::Build(Bool_t isTransient)
             element = new TStreamerSTLstring(dmName, dmTitle, offset, dmFull, dmIsPtr);
          } else if (dm->IsSTLContainer()) {
             TVirtualCollectionProxy *proxy = TClass::GetClass(dmType /* the underlying type */)->GetCollectionProxy();
-            if (proxy) element = new TStreamerSTL(dmName, dmTitle, offset, dmFull, *proxy, dmIsPtr);
-            else element = new TStreamerSTL(dmName, dmTitle, offset, dmFull, dmFull, dmIsPtr);
+            if (proxy)
+               element = new TStreamerSTL(dmName, dmTitle, offset, dmFull, *proxy, dmIsPtr);
+            else
+               element = new TStreamerSTL(dmName, dmTitle, offset, dmFull, dmFull, dmIsPtr);
             bool hasCustomAlloc = proxy ? proxy->GetProperties() & TVirtualCollectionProxy::kCustomAlloc : kFALSE;
             if (((TStreamerSTL*)element)->GetSTLtype() != ROOT::kSTLvector || hasCustomAlloc) {
                auto printErrorMsg = [&](const char* category)