OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
Code Packages Releases Activity

0028973: Undo/Redo changes the order of some attributes

Browse Source
This commit is contained in:
vro 2017-08-07 08:52:40 +03:00 committed by bugmaster
parent e2c4ce4869
commit 095e90a2c5
2 changed files with 42 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/TDF/TDF_DefaultDeltaOnRemoval.cxx
View File

@ -42,5 +42,5 @@ TDF_DefaultDeltaOnRemoval::TDF_DefaultDeltaOnRemoval
void TDF_DefaultDeltaOnRemoval::Apply()
{
Label().AddAttribute(Attribute());
Label().AddAttribute(Attribute(), Standard_True);
}

41
tests/caf/basic/B8 Normal file
View File

@ -0,0 +1,41 @@
#INTERFACE CAF
# Basic attributes
#
# Testing order of attributes on Undo/Redo
#
# Testing command: SetInteger
# Testing command: GetReal
# Testing command: Undo and Redo
#
puts "caf001-B8"
NewCommand D
SetInteger D 0:1 123
SetReal D 0:1 123.321
NewCommand D
CheckLabel D 0:1
set res1 [CheckLabel D 0:1]
set indexReal1 [lsearch ${res1} TDataStd_Real]
set indexInt1 [lsearch ${res1} TDataStd_Integer]
if { ${indexReal1} != 5} {
puts "Error: Wrong position 1 of TDataStd_Real attribute."
}
if { ${indexInt1} != 11} {
puts "Error: Wrong position 1 of TDataStd_Integer attribute."
}
Undo D
Redo D
CheckLabel D 0:1
set res2 [CheckLabel D 0:1]
set indexReal2 [lsearch ${res2} TDataStd_Real]
set indexInt2 [lsearch ${res2} TDataStd_Integer]
if { ${indexReal1} != ${indexReal2}} {
puts "Error: Wrong position 2 of TDataStd_Real attribute."
}
if { ${indexInt1} != ${indexInt2}} {
puts "Error: Wrong position 2 of TDataStd_Integer attribute."
}