FiveTech Software tech support forums

Code: Select all | Expand

#include "Directry.ch"

#define NTRIM( nNumber ) LTrim( Str( nNumber ) )

#define LF Chr( 10 )


FUNCTION MAIN()

    LOCAL cTxt, aDir

    LOCAL i

    cTxt = MEMOREAD( "contrib\hbcurl\hbcurl.hbp" )

    cTxt = STRTRAN( cTxt, "libcurl-4.dll", "libcurl-x64.dll" )

    MEMOWRIT( "contrib\hbcurl\hbcurl.hbp", cTxt, .F. )

    cTxt = MEMOREAD( "config\win\bcc.mk" )

    cTxt = STRTRAN( cTxt, " -CP437", "" )
    cTxt = STRTRAN( cTxt, "-w-aus -w-ccc -w-csu -w-ovf -w-par -w-rch -w-spa", "" )
    cTxt = STRTRAN( cTxt, " -OS -Ov -Oc", "" )
    cTxt = STRTRAN( cTxt, " -w-sig", "" )
    cTxt = STRTRAN( cTxt, "c0x64.obj", "c0x64.o" )

    MEMOWRIT( "config\win\bcc.mk", cTxt, .F. )

    cTxt = MEMOREAD( "src\compiler\hbgenerr.c" )

    cTxt = STRTRAN( cTxt, "2Codeblock parameter", "4Codeblock parameter" )

    MEMOWRIT( "src\compiler\hbgenerr.c", cTxt, .F. )

    aDir = DIRECTORY( "src\codepage\*.*" )

    FOR i = 1 TO LEN( aDir )
        cTxt = MEMOREAD( "src\codepage\" + aDir[ i, F_NAME ] )

        cTxt = TOOCTAL( cTxt )

        IF cTxt != NIL
            MEMOWRIT( "src\codepage\" + aDir[ i, F_NAME ], cTxt, .F. )
        ENDIF
    NEXT

    aDir = DIRECTORY( "src\lang\*.*" )

    FOR i = 1 TO LEN( aDir )
        cTxt = MEMOREAD( "src\lang\" + aDir[ i, F_NAME ] )

        cTxt = TOOCTAL( cTxt )

        IF cTxt != NIL
            MEMOWRIT( "src\lang\" + aDir[ i, F_NAME ], cTxt, .F. )
        ENDIF
    NEXT

    cTxt = MEMOREAD( "utils\hbmk2\hbmk2.prg" )

    cTxt = STRTRAN( cTxt, " -CP437", "" )
    cTxt = STRTRAN( cTxt, "-w-sig -w-aus -w-ccc -w-csu -w-ovf -w-par -w-rch -w-spa -w-sus -w-pia", "" )
    cTxt = STRTRAN( cTxt, ["-n" + ], 'IF( hbmk[ _HBMK_cCOMP ] == "bcc64", "-output-dir", "-n" ) + ' )
    cTxt = STRTRAN( cTxt, [ -OS -Ov -Oc"], ["] )
    cTxt = STRTRAN( cTxt, " -w-sig", "" )
    cTxt = STRTRAN( cTxt, "c0x64.obj", "c0x64.o" )
    cTxt = STRTRAN( cTxt, "cw64mt.lib", "cw64mt.a" )
    cTxt = STRTRAN( cTxt, "import64.lib", "import64.a" )
    cTxt = STRTRAN( cTxt, [         cLibPathPrefix := ""], 'IF hbmk[ _HBMK_cCOMP ] == "bcc64"' + LF + [bBlk_ImpLib := {| cSourceDLL, cTargetLib, cFlags | win_implib_command_bcc( hbmk, "mkexp.exe {FI} {OL} {ID}", cSourceDLL, cTargetLib, cFlags ) }] + LF + "ENDIF" + LF + [         cLibPathPrefix := ""] )

    MEMOWRIT( "utils\hbmk2\hbmk2.prg", cTxt, .F. )

    RETURN NIL


STATIC FUNCTION TOOCTAL( cTxt )

    LOCAL cRes := ""

    LOCAL nVal, cVal

    LOCAL lUtf := .F.

    LOCAL i

    FOR i = 1 TO LEN( cTxt )
        IF ASC( SUBSTR( cTxt, i, 1 ) ) <= 127
            cRes += SUBSTR( cTxt, i, 1 )
        ELSE
            nVal = ASC( SUBSTR( cTxt, i, 1 ) )

            cVal = ""

            WHILE nVal / 8 > 0
                cVal = NTRIM( INT( nVal % 8 ) ) + cVal
                nVal = INT( nVal / 8 )
            ENDDO

            cRes += "\" + cVal

            lUtf = .T.
        ENDIF
    NEXT

    RETURN IF( lUtf, cRes, NIL )

Code: Select all | Expand

ilink64.exe  -L"..\..\..\..\..\lib\win\bcc64" -Gn -Tpe  -LD:\devel\bcc77_64\LIB -Ld:\devel\harbour_bcc77_64\lib\win\bcc64  c0x64.o hbpp.o, "..\..\..\..\..\bin\win\bcc64\hbpp.exe", nul, hbnortl hbcommon winmm kernel32 user32 ws2_32 iphlpapi advapi32 gdi32 cw64mt import64,,
Turbo Incremental Link64 6.98 Copyright (c) 1997-2023 Embarcadero Technologies, Inc.
Fatal: Expected an option: Gn
../../../../../config/rules.mk:142: recipe for target 'hbpp.exe' failed
win-make.exe[3]: *** [hbpp.exe] Error 2
rm hbpp.o
../../config/lib.mk:68: recipe for target 'descend' failed
win-make.exe[2]: *** [descend] Error 2
../config/dir.mk:68: recipe for target 'pp.inst' failed
win-make.exe[1]: *** [pp.inst] Error 2
config/dir.mk:68: recipe for target 'src.inst' failed
win-make.exe: *** [src.inst] Error 2

Code: Select all | Expand

SET PATH=d:\devel\bcc77_64\BIN
SET HB_INSTALL_PREFIX=d:\devel\harbour_bcc77_64
REM SET HB_WITH_PCRE=D:\devel\pcre
SET HB_WITH_CURL=D:\devel\curl-8.6.0_1-win64-mingw\include
SET HB_WITH_PGSQL=D:\pg13\include
SET HB_WITH_FREEIMAGE=D:\devel\FreeImage\Dist\x64
SET HB_WITH_GD=D:\devel\gd-2.3.3_64bits\include
REM SET HB_WITH_ZLIB=D:\devel\zlib
SET HB_WITH_MINIZIP=D:\devel\zlib\contrib\minizip
SET HB_WITH_OPENSSL=D:\devel\OpenSSLWin64\include
REM SET HB_WITH_PNG=d:\devel\libpng-1.6.40
SET HB_WITH_LIBHARU=D:\devel\libharu-2-4-4-0\include
SET HB_STATIC_CURL=yes
SET HB_BUILD_VERBOSE=yes
SET HB_BUILD_DYN=yes
SET HB_BUILD_CONTRIB_DYN=yes
SET HB_COMPILER=bcc64
SET HB_CPU=x86_64
SET HB_BUILD_MODE=c
SET HB_USER_PRGFLAGS=-l-
SET HB_BUILD_OPTIM=no
SET HB_USER_CFLAGS=-O2
SET HB_USER_RESFLAGS=-ID:\devel\bcc77_64\include\windows\sdk\
REM SET HB_TRACE=yes
SET HB_USER_LDFLAGS=-LD:\devel\bcc77_64\LIB -Ld:\devel\harbour_bcc77_64\lib\win\bcc64 
REM SET HB_USER_LIBS=-LD:\devel\bcc77_64\LIB xmath

SET INCLUDE=%INCLUDE%;d:\devel\harbour_bcc77_64\include;d:\devel\bcc77_64\include;d:\devel\bcc77_64\include\sys
SET LIB=%LIB%;d:\devel\bcc77_64\lib;d:\devel\harbour_bcc77_64\lib
SET HB_PATH=d:\devel\harbour_bcc77_64
SET HRB_DIR=d:\devel\harbour_bcc77_64
SET HB_INC_PGSQL=d:\pg13\include
 

Code: Select all | Expand

@ ECHO OFF

SET BCC=*** PUT YOUR BCC PATH HERE! ***

SET PATH=%BCC%\bin
SET HB_INSTALL_PREFIX=%cd%\harbour

SET HB_USER_LDFLAGS=-ap

SET HB_WITH_CURL=e:\hrbbld\curl\x86\include
SET HB_STATIC_CURL=yes

SET HB_WITH_OPENSSL=e:\hrbbld\openssl\x86\include
SET HB_WITH_ADS=e:\hrbbld\ads\x86
SET HB_WITH_MYSQL=e:\hrbbld\mysql\include

SET HB_BUILD_DYN=no
SET HB_BUILD_CONTRIB_DYN=no

IF EXIST lib\3rd\win\bcc REN lib\3rd\win\bcc bccx

win-make clean install HB_USER_CFLAGS="-w!-"

IF EXIST lib\3rd\win\bccx REN lib\3rd\win\bccx bcc

PAUSE