0030130: Coding Rules - MSVC 2017 gives warnings about using of std::fpos::seekpos...
[occt.git] / genproj.bat
... / ...
CommitLineData
1@echo off
2
3rem Helper script to run generation of VS projects on Windows.
4rem Running it requires that Tcl should be in the PATH
5rem Optional arguments: Format OS
6rem Format can be vc10, vc11, vc12, vc14, vc141, cbp, or xcd
7rem OS can be wnt, uwp, mac, or lin
8
9SET "OLD_PATH=%PATH%"
10
11rem run GUI configurator if custom.bat is missing
12if not exist "%~dp0custom.bat" (
13 call %~dp0genconf.bat
14)
15
16if not exist "%~dp0custom.bat" (
17 echo Error: custom.bat is not present.
18 echo Run the script again to generate custom.bat, or create it manually
19 goto :eof
20)
21
22if exist "%~dp0env.bat" (
23 call "%~dp0env.bat" %1
24)
25
26rem find Tcl
27set "TCL_EXEC=tclsh.exe"
28for %%X in (%TCL_EXEC%) do (set TCL_FOUND=%%~$PATH:X)
29
30set "TCL_EXEC2=tclsh86.exe"
31if not defined TCL_FOUND (
32 for %%X in (%TCL_EXEC2%) do (
33 set TCL_FOUND=%%~$PATH:X
34 set TCL_EXEC=%TCL_EXEC2%
35 )
36)
37
38rem fail if Tcl is not found
39if not defined TCL_FOUND (
40 echo Error: "%TCL_EXEC%" is not found. Please update PATH variable ^(use custom.bat^)
41 goto :eof
42)
43
44set aPlatform=%2
45if "%aPlatform%" == "" (
46 set aPlatform=wnt
47 if "%VCPROP%" == "Universal" (
48 set aPlatform=uwp
49 )
50)
51
52cd %~dp0
53%TCL_EXEC% %~dp0adm/start.tcl genproj %VCFMT% %aPlatform% %3 %4 %5
54SET "PATH=%OLD_PATH%"