Enhancements to TclKit batch tool for MSVC.

FossilOrigin-Name: 2a8a4552112be6e39e3475e9a8579582b5157086d3efd37971463c0e3958068d
This commit is contained in:
mistachkin 2020-10-14 21:31:20 +00:00
parent 05881886a6
commit d5157e01b8
3 changed files with 56 additions and 23 deletions

View File

@ -1,8 +1,9 @@
B 3e2643619d122616663688533977d6c60d45a269b4e2bdc330fd3ee5d39f2e03
C Fix\stypo\sin\sa\sdocumentation\scomment.
D 2020-10-14T21:30:56.712
C Enhancements\sto\sTclKit\sbatch\stool\sfor\sMSVC.
D 2020-10-14T21:31:20.801
F src/sqlite.h.in ff32663b457306eb88c3039868280aa39da31162ed69c4e71fa8e028684e7277
P 3e2643619d122616663688533977d6c60d45a269b4e2bdc330fd3ee5d39f2e03
R f2cdeae9fbbf8c968aa0da3cd70c5e67
F tool/GetTclKit.bat e95747c0f7a9fe279a9979178b71f6431a21f945b390fc3120244897ff3f5135
P 462adc7d6b14de3862c2a3e57dba7efaf2ba9c104e1c127a5801a7b892059872
R 3162f2d98ba7e72ea341cc0a18bf24df
U mistachkin
Z 6e1c34305348e206be5e4532458d1494
Z ab2d12d31d9446cbfffdb488dc02a0a5

View File

@ -1 +1 @@
462adc7d6b14de3862c2a3e57dba7efaf2ba9c104e1c127a5801a7b892059872
2a8a4552112be6e39e3475e9a8579582b5157086d3efd37971463c0e3958068d

View File

@ -39,10 +39,11 @@ IF DEFINED DUMMY2 (
GOTO usage
)
SET ROOT=%~dp0\..
SET ROOT=%ROOT:\\=\%
IF NOT DEFINED ENVDIR (
SET ENVDIR=%CD%
)
%_VECHO% Root = '%ROOT%'
%_VECHO% EnvDir = '%ENVDIR%'
SET TOOLS=%~dp0
SET TOOLS=%TOOLS:~0,-1%
@ -64,21 +65,42 @@ IF NOT DEFINED TEMP (
%_VECHO% Temp = '%TEMP%'
IF NOT DEFINED TCLKIT_URI (
SET TCLKIT_URI=https://tclsh.com/
SET TCLKIT_URI=https://urn.to/r/tclsh/
)
%_VECHO% TclKitUri = '%TCLKIT_URI%'
IF NOT DEFINED TCLKIT_PATCHLEVEL (
SET TCLKIT_PATCHLEVEL=8.6.6
)
%_VECHO% TclKitPatchLevel = '%TCLKIT_PATCHLEVEL%'
IF NOT DEFINED TCLKIT_EXE_PATCHLEVEL (
SET TCLKIT_EXE_PATCHLEVEL=8.6.4
)
%_VECHO% TclKitExePatchLevel = '%TCLKIT_EXE_PATCHLEVEL%'
IF /I "%PROCESSOR%" == "x86" (
CALL :fn_TclKitX86Variables
IF ERRORLEVEL 1 (
GOTO errors
)
) ELSE IF /I "%PROCESSOR%" == "x64" (
CALL :fn_TclKitX64Variables
IF ERRORLEVEL 1 (
GOTO errors
)
) ELSE (
GOTO usage
)
%_VECHO% TclKitVersion = '%TCLKIT_VERSION%'
%_VECHO% TclKitPatchLevel = '%TCLKIT_PATCHLEVEL%'
%_VECHO% TclKitExePatchLevel = '%TCLKIT_EXE_PATCHLEVEL%'
%_VECHO% TclKitNoEnv = '%TCLKIT_NOENV%'
%_VECHO% TclKitNoSdk = '%TCLKIT_NOSDK%'
%_VECHO% TclKitExe = '%TCLKIT_EXE%'
@ -173,20 +195,20 @@ IF ERRORLEVEL 1 (
IF DEFINED TCLKIT_NOENV GOTO skip_sdkEnvironment
%__ECHO% ECHO SET TCLSH_CMD=%TEMP%\%TCLKIT_EXE%%OVERWRITE%"%ROOT%\SetTclKitEnv.bat"
%__ECHO% ECHO SET TCLSH_CMD=%TEMP%\%TCLKIT_EXE%%OVERWRITE%"%ENVDIR%\SetTclKitEnv.bat"
IF DEFINED TCLKIT_NOSDK GOTO skip_sdkVariables
%__ECHO% ECHO SET TCLINCDIR=%TEMP%\%TCLKIT_SDK%\include%APPEND%"%ROOT%\SetTclKitEnv.bat"
%__ECHO% ECHO SET TCLLIBDIR=%TEMP%\%TCLKIT_SDK%\lib%APPEND%"%ROOT%\SetTclKitEnv.bat"
%__ECHO% ECHO SET LIBTCLPATH=%TEMP%\%TCLKIT_SDK%\lib%APPEND%"%ROOT%\SetTclKitEnv.bat"
%__ECHO% ECHO SET LIBTCL=%TCLKIT_LIB%%APPEND%"%ROOT%\SetTclKitEnv.bat"
%__ECHO% ECHO SET LIBTCLSTUB=%TCLKIT_LIB_STUB%%APPEND%"%ROOT%\SetTclKitEnv.bat"
%__ECHO% ECHO SET TCLINCDIR=%TEMP%\%TCLKIT_SDK%\include%APPEND%"%ENVDIR%\SetTclKitEnv.bat"
%__ECHO% ECHO SET TCLLIBDIR=%TEMP%\%TCLKIT_SDK%\lib%APPEND%"%ENVDIR%\SetTclKitEnv.bat"
%__ECHO% ECHO SET LIBTCLPATH=%TEMP%\%TCLKIT_SDK%\lib%APPEND%"%ENVDIR%\SetTclKitEnv.bat"
%__ECHO% ECHO SET LIBTCL=%TCLKIT_LIB%%APPEND%"%ENVDIR%\SetTclKitEnv.bat"
%__ECHO% ECHO SET LIBTCLSTUB=%TCLKIT_LIB_STUB%%APPEND%"%ENVDIR%\SetTclKitEnv.bat"
:skip_sdkVariables
ECHO.
ECHO Wrote "%ROOT%\SetTclKitEnv.bat".
ECHO Wrote "%ENVDIR%\SetTclKitEnv.bat".
ECHO Please run it to set the necessary Tcl environment variables.
ECHO.
@ -202,12 +224,17 @@ GOTO no_errors
REM to be available for download.
REM
IF NOT DEFINED TCLKIT_PATCHLEVEL (
SET TCLKIT_PATCHLEVEL=8.6.6
ECHO The TCLKIT_PATCHLEVEL environment variable must be set first.
CALL :fn_SetErrorLevel
GOTO :EOF
)
SET TCLKIT_VERSION=%TCLKIT_PATCHLEVEL:.=%
SET TCLKIT_VERSION=%TCLKIT_VERSION:~0,2%
REM SET TCLKIT_EXE=tclkit-%TCLKIT_PATCHLEVEL%.exe
SET TCLKIT_EXE=tclkit-8.6.4.exe
IF DEFINED TCLKIT_EXE_PATCHLEVEL (
SET TCLKIT_EXE=tclkit-%TCLKIT_EXE_PATCHLEVEL%.exe
) ELSE (
SET TCLKIT_EXE=tclkit-%TCLKIT_PATCHLEVEL%.exe
)
SET TCLKIT_LIB=libtclkit%TCLKIT_PATCHLEVEL:.=%.lib
SET TCLKIT_LIB_STUB=libtclstub%TCLKIT_VERSION:.=%.a
SET TCLKIT_SDK=libtclkit-sdk-x86-%TCLKIT_PATCHLEVEL%
@ -226,12 +253,17 @@ GOTO no_errors
REM to be available for download.
REM
IF NOT DEFINED TCLKIT_PATCHLEVEL (
SET TCLKIT_PATCHLEVEL=8.6.6
ECHO The TCLKIT_PATCHLEVEL environment variable must be set first.
CALL :fn_SetErrorLevel
GOTO :EOF
)
SET TCLKIT_VERSION=%TCLKIT_PATCHLEVEL:.=%
SET TCLKIT_VERSION=%TCLKIT_VERSION:~0,2%
REM SET TCLKIT_EXE=tclkit-%TCLKIT_PATCHLEVEL%.exe
SET TCLKIT_EXE=tclkit-8.6.4.exe
IF DEFINED TCLKIT_EXE_PATCHLEVEL (
SET TCLKIT_EXE=tclkit-%TCLKIT_EXE_PATCHLEVEL%.exe
) ELSE (
SET TCLKIT_EXE=tclkit-%TCLKIT_PATCHLEVEL%.exe
)
SET TCLKIT_LIB=libtclkit%TCLKIT_PATCHLEVEL:.=%.lib
SET TCLKIT_LIB_STUB=libtclstub%TCLKIT_VERSION:.=%.a
SET TCLKIT_SDK=libtclkit-sdk-x64-%TCLKIT_PATCHLEVEL%