5 ###########################################################################
6 # Undo of modification of the attribute TDataStd_IntPackedMap works wrong
7 ###########################################################################
11 SetIntPackedMap D 0:1 1 319
12 puts "initial: [GetIntPackedMap D 0:1]"
15 ChangeIntPackedMap_Add D 0:1 344
16 ChangeIntPackedMap_Rem D 0:1 319
18 puts "after changes: [GetIntPackedMap D 0:1]"
22 set map [GetIntPackedMap D 0:1]
23 puts "after undo: $map"
26 puts "ERROR: OCC25112 is reproduced. Expected map content is 319"