mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
ec96437207
1. Bug fix in reading old persistent data using FSD_File storage driver 2. Persistence compatible with legacy format was restored for shapes a. Implemented a storage read / write wrapper for legacy persistence b. Added DRAW commands to read / write files in legacy format c. Added test cases for reading / writing operations with checking number of sub-shapes and physical properties d. Updated related sections of the development guide
25 lines
700 B
Plaintext
25 lines
700 B
Plaintext
pload MODELING OCAF XDE
|
|
|
|
# check writing shape to FSD archive (old persistence) and reading its back
|
|
proc check_fsd {shape driver {mesher brepmesh}} {
|
|
# check base shape
|
|
uplevel #0 checkshape $shape
|
|
|
|
# write shape to a file
|
|
uplevel fsdwrite $shape ${::imagedir}/${::test_image}.$driver ${driver}
|
|
|
|
# restore shape from a file
|
|
uplevel fsdread ${::imagedir}/${::test_image}.$driver result
|
|
|
|
# check result shape
|
|
uplevel checkshape result
|
|
|
|
# check the number of subshapes
|
|
uplevel checknbshapes result -ref \[nbshapes $shape\]
|
|
|
|
# check properties
|
|
uplevel checkprops result -l -equal $shape
|
|
uplevel checkprops result -s -equal $shape
|
|
uplevel checkprops result -v -equal $shape
|
|
}
|