0026150: BRepOffsetAPI_ThruSections doesn't implement history method Generated().
[occt.git] / genconf.bat
1 @echo off
2
3 rem Helper script to configure environment for building with genproj tool.
4 rem Running it requires that Tcl should be in the PATH
5
6 SET "OLD_PATH=%PATH%"
7
8 rem create env.bat if it does not exist yet
9 if exist "%~dp0env.bat" (
10   call "%~dp0env.bat"
11 ) else (
12   type "%~dp0adm\templates\env.bat" | findstr /i /v "__CASROOT__" > "%~dp0env.bat"
13 )
14
15 rem  find Tcl
16 set "TCL_EXEC=tclsh.exe"
17 for %%X in (%TCL_EXEC%) do (set TCL_FOUND=%%~$PATH:X)
18
19 set "TCL_EXEC2=tclsh86.exe"
20 if not defined TCL_FOUND (
21   for %%X in (%TCL_EXEC2%) do (
22     set TCL_FOUND=%%~$PATH:X
23     set TCL_EXEC=%TCL_EXEC2%
24   )
25 )
26
27 rem Prompt the user to specify location of Tcl if not found in PATH
28 if not defined TCL_FOUND (
29   set /P TCL_PATH=This script requires Tcl, but tclsh.exe cannot be found in PATH.^
30
31 Please enter path to folder containing tclsh.exe^
32
33 ^: 
34   rem NOTE: KEEP LINE AFTER "set" ABOVE EMPTY !
35 )
36
37 if exist %TCL_PATH%\tclsh.exe (
38   set "TCL_FOUND=%TCL_PATH%\tclsh.exe"
39 ) else if exist %TCL_PATH%\tclsh86.exe (
40   set "TCL_FOUND=%TCL_PATH%\tclsh86.exe"
41 ) else (
42   set "TCL_EXEC=%TCL_PATH%\tclsh.exe"
43 )
44
45 rem Initialize custom.bat if it does not exist yet
46 rem if not exist %%dp0custom.bat (
47 rem   echo set "PATH=%%PATH%%;%TCL_PATH%" >%~dp0custom.bat
48 rem )
49
50 rem fail if Tcl is not found
51 if not defined TCL_FOUND (
52   echo Error: "%TCL_EXEC%" is not found. Please update PATH variable ^(use custom.bat^)
53   goto :eof
54
55
56 :: run GUI tool
57 "%TCL_FOUND%" %~dp0adm/genconf.tcl
58
59 SET "PATH=%OLD_PATH%"