mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-02 17:46:22 +03:00
11 lines
408 B
Tcl
Executable File
11 lines
408 B
Tcl
Executable File
global tcl_platform
|
|
|
|
if {[array get env QA_DUMP] != "" && $env(QA_DUMP) == "1"} {
|
|
puts "QA commands have been loaded"
|
|
set env(QADEFAULT) $env(CASROOT)/src/QAResources/QADrawAppliInit
|
|
set env(QA_LD_LIBRARY_PATH) $env(CASROOT)/sun/lib/.
|
|
set env(DRAWDEFAULTOLD) $env(DRAWDEFAULT)
|
|
set env(DRAWDEFAULT) "$env(QADEFAULT)"
|
|
set env(CSF_DrawPluginQADefaults) $env(CASROOT)/src/QAResources/.
|
|
}
|