From c:\bcc7140\lib do this:
go64.batcopy c0x64.o c0x64.obj
copy cw64mt.a cw64mt.lib
copy import64.a import.lib
Code: Select all | Expand
set bcc=bcc7164
set path=c:\%bcc%\bin
set HB_COMPILER=bcc64
set HB_BUILD_MODE=c
set HB_BUILD_OPTIM=no
set HB_USER_PRGFLAGS=-l-
set HB_USER_CFLAGS=-Ic:\%bcc%\INCLUDE\windows\crtl -Ic:\%bcc%\INCLUDE\windows\sdk -Lc:\%bcc%\LIB
set HB_BUILD_WARN=yes
set HB_USER_LDFLAGS=-Lc:\%bcc%\LIB;c:\%bcc%\LIB\psdk
set HB_USER_RESFLAGS=-Ic:\%bcc%\INCLUDE\windows\sdk
set HB_BUILD_CONTRIBS
set HB_HAS_PCRE=no
rem set HB_BUILD_DEBUG=yes
rem set HB_TR_LEVEL=debug
rem set HB_USER_CFLAGS=-DHB_TR_LEVEL_DEBUG
set HB_WITH_OPENSSL=c:\OpenSSL-Win64\include
set HB_WITH_CURL=c:\curl64\include
set HB_OPENSSL_STATIC=yes
set HB_STATIC_OPENSSL=yes
set HB_STATIC_CURL=yes
set HB_WITH_LIBHARU
set HB_BUILD_DYN=no
set HB_BUILD_CONTRIB_DYN=no
win-make.exe
Code: Select all | Expand
//#if defined( __BORLANDC__ ) && defined( HB_OS_WIN_64 )
#if defined(__BORLANDC__) && defined(__clang__) && defined(_WIN64)
/* $NetBSD: isnanl.c,v 1.8 2011/06/05 14:43:13 christos Exp $ */
/*
* Copyright (c) 1992, 1993
* The Regents of the University of California. All rights reserved.
*
* This software was developed by the Computer Systems Engineering group
* at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
* contributed to Berkeley.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
* from: Header: isinf.c,v 1.1 91/07/08 19:03:34 torek Exp
*/
#include <math.h>
#define EXT_EXP_INFNAN 0x7fff
#define EXT_EXPBITS 15
#define EXT_FRACHBITS 16
#define SNG_EXP_INFNAN 255
#define DBL_EXP_INFNAN 2047
struct ieee_ext
{
unsigned int ext_sign:1;
unsigned int ext_exp:EXT_EXPBITS;
unsigned int ext_frach:EXT_FRACHBITS;
unsigned int ext_frachm;
unsigned int ext_fraclm;
unsigned int ext_fracl;
};
union ieee_ext_u
{
long double extu_ld;
struct ieee_ext extu_ext;
};
struct ieee_double
{
unsigned int dbl_sign:1;
unsigned int dbl_exp:11;
unsigned int dbl_frach:20;
unsigned int dbl_fracl;
};
HB_EXTERN_BEGIN
extern int _isnanl( long double x );
extern int _finitel( long double d );
extern int _finite( double d );
HB_EXTERN_END
/*
* 7.12.3.4 isnan - test for a NaN
* IEEE 754 compatible 80-bit extended-precision Intel 386 version
*/
int _isnanl( long double x )
{
union ieee_ext_u u;
u.extu_ld = x;
return u.extu_ext.ext_exp == EXT_EXP_INFNAN &&
( u.extu_ext.ext_frach & 0x80000000 ) != 0 &&
( u.extu_ext.ext_frach != 0x80000000 || u.extu_ext.ext_fracl != 0 );
}
int _finite( double d )
{
struct ieee_double * p = ( struct ieee_double * ) &d;
return p->dbl_exp != DBL_EXP_INFNAN;
}
int _finitel( long double d )
{
struct ieee_double * p = ( struct ieee_double * ) &d;
return p->dbl_exp != DBL_EXP_INFNAN;
}
#endif
Finlly, when trying to build hbrun.exe we get this error:# Copyright 2010 Viktor Szakats (vszakats.net/harbour)
# These may be overridden by local project options.
-q0
-optim-
{HB_BUILD_VERBOSE}-quiet-
{HB_BUILD_VERBOSE}-info
{HB_BUILD_VERBOSE}-trace
-exitstr
{!HB_BUILD_DEBUG}-l
{(HB_BUILD_MODE='cpp')|(!HB_BUILD_MODE&allmsvc)}-cpp=yes
{HB_BUILD_MODE='c'}-cpp=no
-warn=yes
to solve it, go to c:\bcc7164\lib\psdk and do this:Fatal: Archive file 'C:\BCC7164\LIB\PSDK\UUID.A' lists no symbols in its dictionary
UUID.a seems corrupted and it is linked but not used. The above workaround solves itcopy UUID.a UUID_.a
copy USP10.a UUID.a