mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
ea86bfe2fa
DCAF require VISUALIZATION for correct work. In some scenario DRAWEXE can generate a dublicates of the internal static singletons. This means each dynamic library will have their own instance of the static singleton. Update all direct library loading to use the DCAF plugin mechanism. This will ensure that the DCAF plugin is loaded only once and that the correct instance is used. Originally issue is reproduced only Linux with dlopen with "RTLD_LAZY". Can be resolved additionally adding "RTLD_LAZY | RTLD_GLOBAL" for dlopen
44 lines
1.2 KiB
Plaintext
44 lines
1.2 KiB
Plaintext
puts "================"
|
|
puts "OCC26229"
|
|
puts "================"
|
|
puts ""
|
|
###################################################################################################
|
|
# Add the possibility in OCAF to open/save a document from/to a stream object (BinOcaf format)
|
|
###################################################################################################
|
|
|
|
pload OCAF
|
|
|
|
NewDocument D BinOcaf
|
|
|
|
# Add an attribute to a data framework
|
|
set aSetAttr1 100
|
|
set aLabel 0:2
|
|
SetInteger D ${aLabel} ${aSetAttr1}
|
|
|
|
# Close/Open the transaction
|
|
NewCommand D
|
|
|
|
# Save the document
|
|
set aFile ${imagedir}/${casename}.cbf
|
|
file delete ${aFile}
|
|
SaveAs D ${aFile} -stream
|
|
if { ![file exists ${aFile}] } {
|
|
puts "Error: there is not ${aFile} file; SaveAs command"
|
|
return
|
|
}
|
|
|
|
|
|
# Restore the document
|
|
Close D
|
|
Open ${aFile} DD -stream
|
|
|
|
# Get a value of the attribute
|
|
set IsDone [catch {set aGetAttr3 [GetInteger DD ${aLabel}]} aResult]
|
|
if { ${IsDone} != 0 ||
|
|
${aSetAttr1}!=${aGetAttr3} } {
|
|
puts ${aResult}
|
|
puts "aSetAttr1=${aSetAttr1} aGetAttr3=${aGetAttr3}"
|
|
puts "Error: get a value of TDataStd_Integer attribute from Streamed restoring document"
|
|
} else {
|
|
puts "Get a value of TDataStd_Integer attribute from Streamed restoring document: OK"
|
|
} |