mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-02 17:46:22 +03:00
d1a67b9d1b
A new script adm/upgrade.tcl defines a Tcl procedure occt_upgrade, to be used for upgrading code of OCCT and applications for changes introduced by OCCT 7.0. Batch script upgrade.bat is provided for convenience. File upgrade.dat contains data (lists of classes) required for some upgrade steps. Details on upgrade procedure are put in dox/dev_guides/upgrade/upgrade.md. OCCT code corrected to improve compatibility with code based on previous versions of OCCT: - Added conversion operator of handle to bool, for use in conditional expressions. - Forward declaration of argument class restored in macro DEFINE_STANDARD_HANDLE. - Includes of used classes added in some headers to avoid problem of missing includes in dependent code - Type cast operators to base curve and surface added in GC and GCE2d classes to reduce porting issues. Added test for local reference to handle initialized by temporary handle to derived class. WOK and CDL User Guides removed.
24 lines
508 B
Batchfile
24 lines
508 B
Batchfile
@echo off
|
|
|
|
rem Helper script to run procedure of automatic upgrade of application code
|
|
rem on newer version of OCCT on Windows.
|
|
rem Running it requires that Tcl should be in the PATH
|
|
|
|
SET "OLD_PATH=%PATH%"
|
|
|
|
if exist "%~dp0env.bat" (
|
|
call "%~dp0env.bat"
|
|
)
|
|
|
|
set "TCL_EXEC=tclsh.exe"
|
|
|
|
for %%X in (%TCL_EXEC%) do (set TCL_FOUND=%%~$PATH:X)
|
|
|
|
if defined TCL_FOUND (
|
|
%TCL_EXEC% %~dp0adm/start.tcl upgrade %*
|
|
) else (
|
|
echo "Error. %TCL_EXEC% is not found. Please update PATH variable"
|
|
)
|
|
|
|
SET "PATH=%OLD_PATH%"
|