mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
49 lines
1.0 KiB
Plaintext
Executable File
49 lines
1.0 KiB
Plaintext
Executable File
puts "================"
|
|
puts "OCC23192"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################################
|
|
# Regression in writestl command
|
|
#######################################################################################
|
|
|
|
catch { pload XDE }
|
|
|
|
set BugNumber OCC23192
|
|
|
|
set aFile $imagedir/${test_image}.stl
|
|
file delete ${aFile}
|
|
|
|
set anASCIImode 0
|
|
|
|
box res 10 10 10
|
|
incmesh res 0.1
|
|
|
|
writestl res ${aFile} ${anASCIImode}
|
|
catch {exec chmod 777 ${aFile}}
|
|
|
|
if { [file exists ${aFile}] } {
|
|
readstl result ${aFile}
|
|
|
|
checknbshapes result -vertex 8 -edge 18 -wire 12 -face 12 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 51
|
|
# Check file size
|
|
set size_status 0
|
|
set filesize [ file size ${aFile} ]
|
|
if { ${filesize} != 0 } {
|
|
set size_status 0
|
|
} else {
|
|
set size_status 1
|
|
}
|
|
|
|
if { ${size_status} == 0 } {
|
|
puts "OK ${BugNumber}"
|
|
} else {
|
|
puts "Faulty ${BugNumber}"
|
|
}
|
|
} else {
|
|
puts "Faulty ${BugNumber}"
|
|
}
|
|
|
|
set square 600
|
|
set 3dviewer 0
|
|
|