1. Forum
  2. Usenet
  3. COMP.LANG.XHARBOUR

  • Batch file for compiling xHarbour program 32 bit

    From reinaldohf@gmail.com@21:1/5 to All on Fri Mar 31 20:44:16 2023
    Please check the paths
    /* ===========================================================*/
    @ ECHO OFF
    SET BCC=C:\BORLAND\BCC740
    SET XHB=c:\xharbour
    SET HARBOURCMD=-a -es2 -gc0 -n -q -w0

    IF EXIST %1.PRG %XHB%\bin\harbour %1 %HARBOURCMD% -i%XHB%\include
    IF EXIST %1.C %BCC%\bin\bcc32 -c -I%XHB%\include %1.c
    IF EXIST %1.OBJ %BCC%\bin\ilink32 -L%BCC%\lib\obj;%BCC%\lib;%XHB%\lib -Gn -M -m -s -Tpe -x -ap c0x32.obj %1.obj, %1.exe,,lang.lib vm.lib rtl.lib rdd.lib macro.lib pp.lib dbfntx.lib dbfcdx.lib dbffpt.lib common.lib gtwin.lib codepage.lib ct.lib tip.lib
    pcrepos.lib hsx.lib hbsix.lib zlib.lib import32.lib cw32.lib, ,

    IF ERRORLEVEL 1 GOTO Pausa

    IF EXIST %1.c DEL %1.c
    IF EXIST %1.o DEL %1.o
    IF ERRORLEVEL 1 GOTO Pausa
    IF NOT EXIST %1.exe GOTO Pausa
    %1

    GOTO end

    :Pausa
    ECHO ERROR
    PAUSE

    :end
    echo.
    /*========================================================*/

    Reynaldo Henrique

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)