[Regression] OCAF attributes insertion order is violated again

7.2.0 has introduced a regression reported as #0024755 and which was fixed in 6.8.0.
The following test case failed when running under 7.2.0:

/*! Regression test for id 24755.*/
void TDF_LabelTest::AddAttribute()
{
    Handle(TDocStd_Application) anApp = new AppStdL_Application;
    Handle(TDocStd_Document) aDoc;
    anApp->NewDocument ("MDTV-Standard", aDoc);
    TDF_Label aLab = aDoc->Main();
    TDataStd_Integer::Set (aLab, 0);
    TDataStd_Name::Set (aLab, "test");

    Standard_Boolean anIsInteger = Standard_True, anIsName = Standard_True;

#if OCC_VERSION_HEX > 0x060701
    TDF_AttributeIterator i (aLab);
    Handle(TDF_Attribute) anAttr = i.Value();
    anIsInteger = anAttr->IsKind (STANDARD_TYPE (TDataStd_Integer));
    i.Next();
    anAttr = i.Value();
    anIsName = anAttr->IsKind (STANDARD_TYPE (TDataStd_Name));
#endif
    //defer check to after close
    anApp->Close (aDoc);
    QVERIFY (anIsInteger);
    QVERIFY (anIsName);
}