mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
355c155147
Modified END file of all group bugs. Command nbshape moved to END file. Add begin with variable subgroup Small correction in END file Replaced test case bug726_3 from moddata to modalg
31 lines
788 B
Plaintext
Executable File
31 lines
788 B
Plaintext
Executable File
if { [array get env os_type] != "" } {
|
|
set os $env(os_type)
|
|
}
|
|
if { [string compare $os "windows"] == 0 } {
|
|
puts "TODO OCC12345 ALL: An exception was caught"
|
|
puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*"
|
|
} else {
|
|
puts "TODO OCC12345 ALL: Tcl Exception: result is not a topological shape!!!"
|
|
}
|
|
puts "TODO OCC12345 ALL: TEST INCOMPLETE"
|
|
|
|
puts "========================"
|
|
puts " OCC469 "
|
|
puts "========================"
|
|
puts ""
|
|
######################################################
|
|
## It's impossible to fuse the two shapes in the file attached. #2740, SAM1493
|
|
######################################################
|
|
|
|
restore [locate_data_file OCC469.brep] a
|
|
explode a
|
|
|
|
checkshape a_1
|
|
checkshape a_2
|
|
|
|
bfuse result a_1 a_2
|
|
checkshape result
|
|
|
|
set square 10
|
|
set 2dviewer 0
|