home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
harbb30g.zip
/
INCLUDE
/
extend.api
< prev
next >
Wrap
Text File
|
1999-09-15
|
3KB
|
93 lines
/*
* $Id: extend.api,v 1.12 1999/09/15 14:03:36 vszel Exp $
*/
/*
* Harbour Project source code:
* Compatibility header file for CA-Clipper Extend API
*
* Copyright 1999 {list of individual authors and e-mail addresses}
* www - http://www.harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version, with one exception:
*
* The exception is that if you link the Harbour Runtime Library (HRL)
* and/or the Harbour Virtual Machine (HVM) with other files to produce
* an executable, this does not by itself cause the resulting executable
* to be covered by the GNU General Public License. Your use of that
* executable is in no way restricted on account of linking the HRL
* and/or HVM code into it.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA (or visit
* their web site at http://www.gnu.org/).
*
*/
/* DON'T USE THIS FILE FOR NEW HARBOUR C CODE */
#ifndef HB_EXTEND_API_
#define HB_EXTEND_API_
#include "clipdefs.h"
#include "extend.h"
typedef PHB_ITEM ITEM;
typedef double XDOUBLE;
/* Compatible defines */
#define UNDEF IT_NIL
#define CHARACTER IT_STRING
#define NUMERIC IT_NUMERIC
#define LOGICAL IT_LOGICAL
#define DATE IT_DATE
#define ALIAS IT_ALIAS
#define MPTR IT_BYREF /* or'ed with type when passed by reference */
#define MEMO IT_MEMO
#define WORD ( IT_INTEGER | IT_LONG )
#define ARRAY IT_ARRAY
#define BLOCK IT_BLOCK
#define DOUBLE IT_DOUBLE
/* Functions */
#define _parc hb_parc
#define _parclen hb_parclen
#define _parcsiz hb_parcsiz
#define _pards hb_pards
#define _parinfa hb_parinfa
#define _parinfo hb_parinfo
#define _parl hb_parl
#define _parnd hb_parnd
#define _parni hb_parni
#define _parnl hb_parnl
#define _ret hb_ret
#define _retc hb_retc
#define _retclen hb_retclen
#define _retds hb_retds
#define _retl hb_retl
#define _retnd hb_retnd
#define _retni hb_retni
#define _retnl hb_retnl
#define _storc hb_storc
#define _storclen hb_storclen
#define _stords hb_stords
#define _storl hb_storl
#define _stornd hb_stornd
#define _storni hb_storni
#define _stornl hb_stornl
#endif /* HB_EXTEND_API_ */