1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-14 13:30:48 +03:00

0026237: Change platform in TODOs from Debian\Mandriva to Linux

Change platform in occt test cases in TODOs from Debian\Mandriva to Linux

Small corrections in test cases. Return procedure _tests_platform_def.
This commit is contained in:
apn
2015-05-21 15:50:31 +03:00
committed by bugmaster
parent c6f11ec0f7
commit 37d6975c77
93 changed files with 153 additions and 512 deletions

View File

@@ -1657,33 +1657,13 @@ proc _tests_platform_def {} {
global env tcl_platform
if [info exists env(os_type)] { return }
set env(os_type) $tcl_platform(platform)
# use detailed mapping for various versions of Lunix
# (note that mapping is rather non-uniform, for historical reasons)
if { $tcl_platform(os) == "Linux" && ! [catch {exec cat /etc/issue} issue] } {
if { [regexp {Mandriva[ \tA-Za-z]+([0-9]+)} $issue res num] } {
set env(os_type) Mandriva$num
} elseif { [regexp {Red Hat[ \tA-Za-z]+([0-9]+)} $issue res num] } {
set env(os_type) RedHat$num
} elseif { [regexp {Debian[ \tA-Za-z/]+([0-9]+)[.]([0-9]+)} $issue res num subnum] } {
set env(os_type) Debian$num$subnum
} elseif { [regexp {Debian[ \tA-Za-z/]+([0-9]+)} $issue res num] } {
set env(os_type) Debian${num}0
} elseif { [regexp {CentOS[ \tA-Za-z]+([0-9]+)[.]([0-9]+)} $issue res num subnum] } {
set env(os_type) CentOS$num$subnum
} elseif { [regexp {Scientific[ \tA-Za-z]+([0-9]+)[.]([0-9]+)} $issue res num subnum] } {
set env(os_type) SL$num$subnum
} elseif { [regexp {Fedora Core[ \tA-Za-z]+([0-9]+)} $issue res num] } {
set env(os_type) FedoraCore$num
}
if { [exec uname -m] == "x86_64" } {
set env(os_type) "$env(os_type)-64"
}
} elseif { $tcl_platform(os) == "Darwin" } {
set env(os_type) MacOS
if { $tcl_platform(os) == "Linux" } {
set env(os_type) Linux
}
if { $tcl_platform(os) == "Darwin" } {
set env(os_type) MacOS
}
}
_tests_platform_def