1 puts "================"
3 puts "================"
5 #######################################################################################
6 # Regression in writestl command
7 #######################################################################################
11 set BugNumber OCC23192
13 set aFile $imagedir/${test_image}.stl
21 writestl res ${aFile} ${anASCIImode} ${InParallel}
22 catch {exec chmod 777 ${aFile}}
24 if { [file exists ${aFile}] } {
25 readstl result ${aFile}
34 set nb_compound_good 0
39 set filesize [ file size ${aFile} ]
40 if { ${filesize} != 0 } {
46 if { ${size_status} == 0 } {
47 puts "OK ${BugNumber}"
49 puts "Faulty ${BugNumber}"
52 puts "Faulty ${BugNumber}"