From: ibs Date: Mon, 9 Dec 2013 06:46:07 +0000 (+0400) Subject: 0024436: WOK does not copy msvc.bat when selected target is vc12 X-Git-Tag: V6_7_1~6 X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=006380f3ec6b0dcd5bcb4f4d99b6c16a3e34ca4f;p=occt-wok.git 0024436: WOK does not copy msvc.bat when selected target is vc12 Fix msvc.bat file copying for vc12 target wgenprojbat copies of msvc.bat for any vc* target --- diff --git a/src/WOKsite/wok_tclshrc.tcl b/src/WOKsite/wok_tclshrc.tcl index 62e50f5..c80dbd5 100644 --- a/src/WOKsite/wok_tclshrc.tcl +++ b/src/WOKsite/wok_tclshrc.tcl @@ -250,17 +250,13 @@ proc wgenprojbat {thePath theIDE} { if { "$::tcl_platform(platform)" == "windows" } { set aTargetPlatform "wnt" } - - switch -exact -- "$theIDE" { - "vc7" - - "vc8" - - "vc9" - - "vc10" - - "vc11" - - "vc12" { set aTargetPlatform wnt } - "amk" { set aTargetPlatform lin } - } + if {[regexp {(vc)[0-9]*$} $theIDE] == 1} { + set aTargetPlatform wnt + } elseif {"$theIDE" == "amk"} { + set aTargetPlatform lin + } + set aTargetPlatformExt sh if { "$aTargetPlatform" == "wnt" } { set aTargetPlatformExt bat @@ -293,15 +289,13 @@ proc wgenprojbat {thePath theIDE} { file copy -force -- "$::env(WOKHOME)/lib/templates/draw.${aTargetPlatformExt}" "$aBox/draw.${aTargetPlatformExt}" } - switch -exact -- "$theIDE" { - "vc7" - - "vc8" - - "vc9" - - "vc10" - - "vc11" { file copy -force -- "$::env(WOKHOME)/lib/templates/msvc.bat" "$aBox/msvc.bat" } - "cbp" { file copy -force -- "$::env(WOKHOME)/lib/templates/codeblocks.sh" "$aBox/codeblocks.sh" } - "xcd" { file copy -force -- "$::env(WOKHOME)/lib/templates/xcode.sh" "$aBox/xcode.sh" } - + if {[regexp {(vc)[0-9]*$} $theIDE] == 1} { + file copy -force -- "$::env(WOKHOME)/lib/templates/msvc.bat" "$aBox/msvc.bat" + } else { + switch -exact -- "$theIDE" { + "cbp" { file copy -force -- "$::env(WOKHOME)/lib/templates/codeblocks.sh" "$aBox/codeblocks.sh" } + "xcd" { file copy -force -- "$::env(WOKHOME)/lib/templates/xcode.sh" "$aBox/xcode.sh" } + } } }