mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
19 lines
393 B
Plaintext
Executable File
19 lines
393 B
Plaintext
Executable File
puts "========"
|
|
puts "OCC710"
|
|
puts "========"
|
|
puts ""
|
|
########################################################
|
|
## If the file pathname is empty, the Standard_Boolean OSD_FileNode::Exists()
|
|
## raises an exception
|
|
########################################################
|
|
|
|
pload QAcommands
|
|
|
|
set Path ""
|
|
|
|
if [catch {OCC710 ${Path} } result] {
|
|
puts "Faulty OCC710"
|
|
} else {
|
|
puts "OCC710 OK"
|
|
}
|