🚀 go-pugleaf

Remy,

I waited a couple of weeks and just downloaded the snapshot and tried to 
compile it for BCB5.

I am using the modified FULLC6.bat file and I get an error when executing

dcc32.exe IndyProtocols50.dpk /O..\Lib\Protocols\objs /DBCB /M /H /W /JPHN 
/N. /U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4

The error is below
. .
Borland Delphi  Version 13.0  Copyright (c) 1983,99 Inprise Corporation
IdCompilerDefines.inc(337)
IdASN1Util.pas(402)
IdCompilerDefines.inc(337)
IdCompilerDefines.inc(337)
IdCompilerDefines.inc(337)
IdCompilerDefines.inc(337)
IdCompilerDefines.inc(337)
IdCompilerDefines.inc(337)
IdCharsets.pas(3607)
IdCompilerDefines.inc(337)
IdResourceStringsProtocols.pas(936)
IdGlobalProtocols.pas(1531) Error: Undeclared identifier: 'DirectoryExists'
IdGlobalProtocols.pas(3167)
IdHeaderList.pas(132) Fatal: Could not compile used unit 
'IdGlobalProtocols.pas'

Error!


I have been looking forward to testing this new release but I have not been 
able to compile for a while.  In case you want to know what I am doing I am 
copying the whole batch file below.  There it goes:

*******************************************************************

@echo off

if (%1)==() goto test_command
if (%1)==(start) goto start
goto endok

:test_command
ECHO *************  TEST COMMAND   ***********
PAUSE
if (%COMSPEC%)==() goto no_command
%COMSPEC% /E:9216 /C %0 start %1 %2 %3
goto endok

:no_command
ECHO *************  NO COMMAND   ***********
PAUSE
echo No Command Interpreter found
goto endok

:start
REM call clean.bat
ECHO *************  BEFORE CALLING COMPUTIL   ***********
PAUSE
computil SetupC5
if exist setenv.bat call setenv.bat
if not exist ..\C5\*.* md ..\C5 >nul
REM if exist ..\C5\*.* call clean.bat ..\C5\
if (%NDC5%)==() goto enderror

REM ***************************************************
REM Compile Runtime Package IndySystem60
REM ***************************************************
ECHO *************  BEFORE COPYING THE FILES   ***********
PAUSE

cd System
copy *.pas ..\..\C5
copy *.dpk ..\..\C5
copy *.obj ..\..\C5
copy *.inc ..\..\C5
copy *.res ..\..\C5
copy *.dcr ..\..\C5
copy *.rsp ..\..\C5
if not exist .\objs\*.* md .\objs >nul
cd ..\..\C5

ECHO *************  COMPILING INDYSYSTEM50.DPK   ***********
PAUSE

dcc32.exe IndySystem50.dpk /O..\Lib\System\objs /DBCB /M /H /W /JPHN 
/N. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
dcc32.exe IndySystem50.dpk /O..\Lib\System\objs /DBCB /M /H /W 
/N. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
ECHO *************  CREATING THE LIBRARY   ***********
PAUSE
for %%f in (*.obj) do tlib.exe IndySystem50.lib +%%f /P64 > nul

ECHO *************  CLEANING UP FILES   ***********
PAUSE

REM ***************************************************
REM Clean-up IndySystem60
REM ***************************************************
del *.dcu > nul
del *.pas > nul
del *.dpk > nul
del *.obj > nul
del *.inc > nul
del *.res > nul
del *.dcr > nul
del *.rsp > nul

REM ***************************************************
REM Compile Runtime Package IndyCore60
REM ***************************************************
cd ..\Lib\Core

ECHO *************  COPYING CORE FILES   ***********
PAUSE

copy *.pas ..\..\C5
copy *.dpk ..\..\C5
copy *.obj ..\..\C5
copy *.inc ..\..\C5
copy *.res ..\..\C5
copy *.dcr ..\..\C5
copy *.rsp ..\..\C5

if not exist .\objs\*.* md .\objs >nul
cd ..\..\C5

ECHO *************  COMPILING INDYCORE50.DPK   ***********
PAUSE

dcc32.exe IndyCore50.dpk /O..\Lib\Core\objs /DBCB /M /H /W /JPHN /N. 
/U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
dcc32.exe IndyCore50.dpk /O..\Lib\Core\objs /DBCB /M /H /W /N. 
/U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror

ECHO *************  CREATING CORE LIBRARY   ***********
PAUSE

for %%f in (*.obj) do tlib.exe IndyCore50.lib +%%f /P64 > nul
del *.obj > nul

REM ***************************************************
REM Compile Designtime Package dclIndyCore60
REM ***************************************************

ECHO *************  COMPILING DCLINDYCORE50.DPK   ***********
PAUSE

dcc32.exe dclIndyCore50.dpk /O..\Lib\Core\objs /DBCB /M /H /W /Z /JPHN /N. 
/U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
dcc32.exe dclIndyCore50.dpk /O..\Lib\Core\objs /DBCB /M /H /W /Z /N. 
/U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror

ECHO *************  CREATING DCLCORE LIBRARY   ***********
PAUSE
for %%f in (*.obj) do tlib.exe dclIndyCore50.lib +%%f /P64 > nul

ECHO *************  CLEANING UP CORE FILES   ***********
PAUSE

REM ***************************************************
REM Clean-up IndyCore60
REM ***************************************************
del *.dcu > nul
del *.pas > nul
del *.dpk > nul
del *.obj > nul
del *.inc > nul
del *.res > nul
del *.dcr > nul
del *.rsp > nul

REM ***************************************************
REM Compile Runtime Package IndyProtocols60
REM ***************************************************

ECHO *************  COPYING PROTOCOL FILES  ***********
PAUSE

cd ..\Lib\Protocols
copy *.pas ..\..\C5
copy *.dpk ..\..\C5
copy *.obj ..\..\C5
copy *.inc ..\..\C5
copy *.res ..\..\C5
copy *.dcr ..\..\C5
copy *.rsp ..\..\C5
if not exist .\objs\*.* md .\objs >nul
cd ..\..\C5

ECHO *************  COMPILING PROTOCOLS ***********
PAUSE
ECHO *************  FIRST ***********
PAUSE
dcc32.exe IndyProtocols50.dpk /O..\Lib\Protocols\objs /DBCB /M /H /W /JPHN 
/N. /U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
ECHO *************  SECOND ***********
PAUSE
dcc32.exe IndyProtocols50.dpk /O..\Lib\Protocols\objs /DBCB /M /H /W /N. 
/U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror

ECHO *************  DELETING THIRD PARTY FILES   ***********
PAUSE

REM ***************************************************
REM Delete third-party .obj files
REM before compiling the .lib file
REM ***************************************************
del adler32.obj > nul
del compress.obj > nul
del crc32.obj > nul
del deflate.obj > nul
del example.obj > nul
del gzio.obj > nul
del infback.obj > nul
del inffast.obj > nul
del inflate.obj > nul
del inftrees.obj > nul
del minigzip.obj > nul
del trees.obj > nul
del uncompr.obj > nul
del zutil.obj > nul
ECHO *************  CREATING PROTOCOLS LIBRARY ***********
PAUSE

for %%f in (*.obj) do tlib.exe IndyProtocols50.lib +%%f /P64 > nul
del *.obj > nul

REM ***************************************************
REM Compile Designtime Package dclIndyProtocols60
REM ***************************************************

ECHO *************  COMPILING dclPROTOCOLS   ***********
PAUSE
dcc32.exe dclIndyProtocols50.dpk /O..\Lib\Protocols\objs /DBCB /M /H /W 
/JPHN /N. /U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
dcc32.exe dclIndyProtocols50.dpk /O..\Lib\Protocols\objs /DBCB /M /H /W /N. 
/U. -$d-l-n+p+r-s-t-w-y- %2 %3 %4
if errorlevel 1 goto enderror
for %%f in (*.obj) do tlib.exe dclIndyProtocols50.lib +%%f /P64 > nul

ECHO *************  DELETING PROTOCOLS FILES  ***********
PAUSE

REM ***************************************************
REM Clean-up IndyProtocols60
REM ***************************************************
del *.dcu > nul
del *.pas > nul
del *.dpk > nul
del *.obj > nul
del *.inc > nul
del *.res > nul
del *.dcr > nul
del *.rsp > nul
cd ..\Lib
goto endok

:enderror
REM call ..\Lib\clean.bat
cd ..\Lib
echo Error!

:endok
pause


*******************************************************************