1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00

0029116: [Regression] OCAF attributes insertion order is violated again

This commit is contained in:
vro 2018-06-04 10:47:18 +03:00 committed by bugmaster
parent b2d1851c43
commit bd6f0d2ff9
3 changed files with 5 additions and 5 deletions

View File

@ -1935,10 +1935,10 @@ static Standard_Integer OCC24755 (Draw_Interpretor& di, Standard_Integer n, cons
TDF_AttributeIterator i (aLab); TDF_AttributeIterator i (aLab);
Handle(TDF_Attribute) anAttr = i.Value(); Handle(TDF_Attribute) anAttr = i.Value();
QCOMPARE (anAttr->IsKind (STANDARD_TYPE (TDataStd_Name)), Standard_True); QCOMPARE (anAttr->IsKind (STANDARD_TYPE (TDataStd_Integer)), Standard_True);
i.Next(); i.Next();
anAttr = i.Value(); anAttr = i.Value();
QCOMPARE (anAttr->IsKind (STANDARD_TYPE (TDataStd_Integer)), Standard_True); QCOMPARE (anAttr->IsKind (STANDARD_TYPE (TDataStd_Name)), Standard_True);
i.Next(); i.Next();
anAttr = i.Value(); anAttr = i.Value();
QCOMPARE (anAttr->IsKind (STANDARD_TYPE (TDataStd_Real)), Standard_True); QCOMPARE (anAttr->IsKind (STANDARD_TYPE (TDataStd_Real)), Standard_True);

View File

@ -117,7 +117,7 @@ public:
//! Adds an Attribute to the current label. Raises if //! Adds an Attribute to the current label. Raises if
//! there is already one. //! there is already one.
Standard_EXPORT void AddAttribute (const Handle(TDF_Attribute)& anAttribute, const Standard_Boolean append = Standard_False) const; Standard_EXPORT void AddAttribute (const Handle(TDF_Attribute)& anAttribute, const Standard_Boolean append = Standard_True) const;
//! Forgets an Attribute from the current label, //! Forgets an Attribute from the current label,
//! setting its forgotten status true and its valid //! setting its forgotten status true and its valid

View File

@ -19,10 +19,10 @@ CheckLabel D 0:1
set res1 [CheckLabel D 0:1] set res1 [CheckLabel D 0:1]
set indexReal1 [lsearch ${res1} TDataStd_Real] set indexReal1 [lsearch ${res1} TDataStd_Real]
set indexInt1 [lsearch ${res1} TDataStd_Integer] set indexInt1 [lsearch ${res1} TDataStd_Integer]
if { ${indexReal1} != 5} { if { ${indexReal1} != 11} {
puts "Error: Wrong position 1 of TDataStd_Real attribute." puts "Error: Wrong position 1 of TDataStd_Real attribute."
} }
if { ${indexInt1} != 11} { if { ${indexInt1} != 5} {
puts "Error: Wrong position 1 of TDataStd_Integer attribute." puts "Error: Wrong position 1 of TDataStd_Integer attribute."
} }