Message-ID:

Meekness: Uncommon patience in planning a revenge that is worth while. -- Ambrose Bierce

devel / comp.lang.xharbour / Batch file for compiling xHarbour program 32 bit

Batch file for compiling xHarbour program 32 bit

<c5d0a4fb-ae8d-41d2-9d69-0a5dcb46d773n@googlegroups.com>

https://www.rocksolidbbs.com/devel/article-flat.php?id=17316&group=comp.lang.xharbour#17316

copy link Newsgroups: comp.lang.xharbour

X-Received: by 2002:a05:622a:24e:b0:3d9:650a:7a9f with SMTP id c14-20020a05622a024e00b003d9650a7a9fmr11095568qtx.3.1680320656483;
Fri, 31 Mar 2023 20:44:16 -0700 (PDT)
X-Received: by 2002:a9d:6a5a:0:b0:69f:8fa8:1a4f with SMTP id
h26-20020a9d6a5a000000b0069f8fa81a4fmr9518795otn.2.1680320656308; Fri, 31 Mar
2023 20:44:16 -0700 (PDT)
Path: i2pn2.org!i2pn.org!weretis.net!feeder8.news.weretis.net!proxad.net!feeder1-2.proxad.net!209.85.160.216.MISMATCH!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.xharbour
Date: Fri, 31 Mar 2023 20:44:16 -0700 (PDT)
Injection-Info: google-groups.googlegroups.com; posting-host=2804:17bc:11a:9100:64b5:3eb3:9ae2:bca;
posting-account=yZJwlQoAAADzKZZdom395T93hGRZPX0-
NNTP-Posting-Host: 2804:17bc:11a:9100:64b5:3eb3:9ae2:bca
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <c5d0a4fb-ae8d-41d2-9d69-0a5dcb46d773n@googlegroups.com>
Subject: Batch file for compiling xHarbour program 32 bit
From: reinaldohf@gmail.com (reina...@gmail.com)
Injection-Date: Sat, 01 Apr 2023 03:44:16 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

by: reina...@gmail.com - Sat, 1 Apr 2023 03:44 UTC

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

Subject	Author
Batch file for compiling xHarbour program 32 bit	reina...@gmail.com