0023570: Command param in DRAW outputs non-readable symbols
[occt.git] / tests / bugs / xde / bug4968
CommitLineData
e54706ed 1puts "========="
2puts " OCC4968 "
3puts "========="
4puts ""
5##################################################
6# Improve FixShape to correct case of touching wires
7##################################################
8
9set BugNumber OCC4968
10
11restore [locate_data_file OCC4968.brep] r
12regexp {WIRE +: +([-0-9.+eE]+)} [nbshapes r] full wire_number1
13
14fixshape result r
15regexp {WIRE +: +([-0-9.+eE]+)} [nbshapes result] full wire_number2
16checkshape result r
17
18puts "wire_number1 = ${wire_number1}"
19puts "wire_number2 = ${wire_number2}"
20if { ${wire_number2} > ${wire_number1}} {
21 puts "OK ${BugNumber}: wire number - OK"
22} else {
23 puts "Faulty ${BugNumber}: wrong wire number"
24}
25
26set 2dviewer 1
27