mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
e13b9464ef
Method XmlObjMgt::GetReal() is improved to (a) recognize NAN and infinity written by old MSVC runtime (like 1.#QNAN and 1.#INF) and (b) detect situation when there are some trailing non-space symbols after the real value, returning False in such case. Reading of real-valued attributes (single real, array, list) from OCAF XML format is improved to create valid attribute even if parsing of (some) members fails; warning is generated instead of error in such case. Added test bugs caf bug29452
54 lines
1.4 KiB
Plaintext
54 lines
1.4 KiB
Plaintext
puts "REQUIRED All: Cannot retrieve real member for RealArray attribute"
|
|
|
|
puts "================"
|
|
puts "OCC2269"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################################
|
|
# XML persistance should be more robust
|
|
#######################################################################################
|
|
#
|
|
# Tested file is contains 3 labels with TDataStd_RealArray attributes
|
|
# 0:2 label has good TDataStd_RealArray attribute
|
|
# 0:22 label has bad TDataStd_RealArray attribute
|
|
# 0:222 label has good TDataStd_RealArray attribute
|
|
#
|
|
#######################################################################################
|
|
|
|
#set ScriptDir $XmlDir
|
|
#source ${ScriptDir}/begin
|
|
#source ${ScriptDir}/002/begin
|
|
|
|
#set aTestName "OCC2269"
|
|
#set WorkDirectory ${filedir}
|
|
#set aFile $WorkDirectory/${aTestName}.${FileSuffix}
|
|
#catch {Close D}
|
|
|
|
set IsGood 1
|
|
Open [locate_data_file OCC2269.xml] DD
|
|
|
|
if [catch {XDumpDF DD } result] {
|
|
puts "Error during dump ${aFile} file"
|
|
set IsGood 0
|
|
}
|
|
if [catch {CheckLabel DD 0:2} result] {
|
|
puts "Error during search 0:2 label in ${aFile} file"
|
|
set IsGood 0
|
|
}
|
|
if [catch {CheckLabel DD 0:22} result] {
|
|
puts "Error during search 0:22 label in ${aFile} file"
|
|
set IsGood 0
|
|
}
|
|
if [catch {CheckLabel DD 0:222} result] {
|
|
puts "Error during search 0:222 label in ${aFile} file"
|
|
set IsGood 0
|
|
}
|
|
|
|
Close DD
|
|
|
|
if { ${IsGood} == 0} {
|
|
puts "Faulty OCC2269"
|
|
} else {
|
|
puts "OK OCC2269"
|
|
}
|